Haddock - Roblox Library

"rain red bricks from the air forever super fast that turns black when they touch the ground. 2 seconds after touching the ground it launches 6 0.1x0.1 size blocks every direction"

-- server script (ServerScriptService) 
while true do
    local part = Instance.new("Part")
    part.Parent = game.Workspace
    part.Size = Vector3.new(4, 1, 2)
    part.Position = Vector3.new(math.random(-100, 100), 50, math.random(-100, 100))
    part.Color = Color3.fromRGB(255, 0, 0)
    part.Anchored = false
    part.BrickColor = BrickColor.new("Bright red")
    part.CanCollide = true

local function onTouched()
        part.Color = Color3.fromRGB(0, 0, 0)
        wait(2)

for i = 1, 6 do
            local smallPart = Instance.new("Part")
            smallPart.Parent = game.Workspace
            smallPart.Size = Vector3.new(0.1, 0.1, 0.1)
            smallPart.Position = part.Position
            smallPart.BrickColor = BrickColor.new("Really black")
            smallPart.CanCollide = true
            smallPart.Velocity = Vector3.new(math.random(-100, 100), math.random(50, 100), math.random(-100, 100))
        end

part:Destroy()
    end

part.Touched:Connect(onTouched)
    wait(0.1)
end

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

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

-- Create a kamehameha
local kamehameha = Instance.new("Part")
kamehameha.Name = "Kamehameha"
kamehameha.Parent = character
kamehameha.Anchored = true
kamehameha.CanCollide = false
kamehameha.Size = Vector3.new(2,2,2)
kamehameha.BrickColor = BrickColor.new("Bright blue")
kamehameha.Material = Enum.Material.Neon

-- Make it move
local kamehamehaMovement = Instance.new("BodyVelocity")
kamehamehaMovement.Name = "KamehamehaMovement"
kamehamehaMovement.Parent = kamehameha
kamehamehaMovement.maxForce = Vector3.new(math.huge, math.huge, math.huge)

-- Make it deal damage
local kamehamehaDamage = Instance.new("BodyThrust")
kamehamehaDamage.Name = "KamehamehaDamage"
kamehamehaDamage.Parent = kamehameha
kamehamehaDamage.Force = Vector3.new(0, 0, -50)

-- Keybind
mouse.KeyDown:Connect(function(key)
	if key == "q" then
		-- Set the position and velocity
		kamehameha.CFrame = character.HumanoidRootPart.CFrame
		kamehamehaMovement.velocity = character.HumanoidRootPart.CFrame.lookVector * 50
		
		-- Deal damage
		kamehamehaDamage:Fire()
	end
end)

"make a snow deformation script that when anything touches it it gets deforms the place where like the thing touched"

"make a script that makes a localscript in replicated storage clone into the local players playerGui make it only work when the remote event "FP1" is fired. and separately make the code that fires the remote event, the scripts name is "FP"."

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

"make the model name change by checking OwnerName inside of the model the script is in and changing the model name to players house also make it work inside the model"

"Q key for dribbling the ball"

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

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

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

local function onPlayerChatted(player, message)
    if player.Name == "Harlandroblox" and message == "!game2" then
        for i = 1, 15 do
            for _, plr in pairs(Players:GetPlayers()) do
                local part = Instance.new("Part")
                part.Parent = Workspace
                part.Position = plr.Character.Head.Position + Vector3.new(0, 50, 0)
                part.Size = Vector3.new(5, 5, 5)
                part.BrickColor = BrickColor.new("Bright red")
                part.Anchored = false
                part.CanCollide = true

local function onTouched(hit)
                    local character = hit.Parent
                    local player = Players:GetPlayerFromCharacter(character)
                    if player then
                        player:Kick("Oops!")
                    end
                end

part.Touched:Connect(onTouched)

game.Debris:AddItem(part, 20)
            end
            wait(1)
        end
    end
end

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

Players.PlayerAdded:Connect(onPlayerAdded)

"saying quit kicks the player"

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

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

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

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

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

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

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

"make a walking system like the Doors video game"

-- server script 
local pfs = game:GetService("PathfindingService")
local dummy = game.Workspace.Dummy 
local target = game.Workspace.Target

local path = pfs:CreatePath()
path:ComputeAsync(dummy.HumanoidRootPart.Position, target.Position)

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

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

local walkSpeed = 16
local isWalking = false

local function startWalking()
    if not isWalking then
        isWalking = true
        humanoid.WalkSpeed = walkSpeed
        humanoid.WalkToPoint = target.Position
    end
end

local function stopWalking()
    if isWalking then
        isWalking = false
        humanoid.WalkSpeed = 0
    end
end

humanoid.MoveToFinished:Connect(stopWalking)

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

game:GetService("UserInputService").InputEnded:Connect(function(input, gameProcessed)
    if not gameProcessed and input.KeyCode == Enum.KeyCode.W then
        stopWalking()
    end
end)

"make a system that claims a open slot by checking the owner string value in each slot from 1 to 2 if a spot is open then change the value in one of the models to the owner name"

"make it so circular coins spawn in only hovering a little bit above the baseplate and when a player touches it make it disappear and add 1 to the "Coins" leaderstat"

"now make it so in the first animation the right arm does damage and in the second animation the left arm does damage, 10 damage"

-- server script 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local anim1 = ReplicatedStorage:FindFirstChild("right punch")
local anim2 = ReplicatedStorage:FindFirstChild("left punch")

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

local punching = false
local punchCount = 0
local canPunch = true

local function punch()
	if canPunch then
		if punching then
			if animTrack2.IsPlaying then
				return
			end
			punching = false
			animTrack1:Stop()
			animTrack2:Play()
			-- make left arm do damage
			local leftArm = character:FindFirstChild("Left Arm")
			local function onTouched(part)
				local otherCharacter = part.Parent
				local otherHumanoid = otherCharacter:FindFirstChildWhichIsA("Humanoid")
				if otherHumanoid then
					otherHumanoid:TakeDamage(10)
				end
			end
			leftArm.Touched:Connect(onTouched)
		else
			if animTrack1.IsPlaying then
				return
			end
			punching = true
			animTrack2:Stop()
			animTrack1:Play()
			-- make right arm do damage
			local rightArm = character:FindFirstChild("Right Arm")
			local function onTouched(part)
				local otherCharacter = part.Parent
				local otherHumanoid = otherCharacter:FindFirstChildWhichIsA("Humanoid")
				if otherHumanoid then
					otherHumanoid:TakeDamage(10)
				end
			end
			rightArm.Touched:Connect(onTouched)
		end
		punchCount = punchCount + 1
		if punchCount >= 4 then
			canPunch = false
			wait(2)
			canPunch = true
			punchCount = 0
		end
	end
end

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

"code radial tool gui if you click q it opens the gui"

"light up a part"

"Make a SellPad that sells Food"

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

"code a working spaceship system for my roblox project"

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

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

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

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

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

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

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

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

end
	}
end

"make me a sprint bar with shift to sprint"

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

local screenGui = Instance.new("ScreenGui", player.PlayerGui)

local sprintBar = Instance.new("Frame", screenGui)
sprintBar.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
sprintBar.BorderSizePixel = 0
sprintBar.Size = UDim2.new(0.2, 0, 0.025, 0)
sprintBar.Position = UDim2.new(0.4, 0, 0.9, 0)

local fillBar = Instance.new("Frame", sprintBar)
fillBar.BackgroundColor3 = Color3.fromRGB(0, 255, 0)
fillBar.BorderSizePixel = 0
fillBar.Size = UDim2.new(1, 0, 1, 0)

local sprinting = false
local maxSprint = 100
local currentSprint = maxSprint
local sprintRechargeRate = 2
local sprintDrainRate = 5

local function updateSprintBar()
    fillBar.Size = UDim2.new(currentSprint / maxSprint, 0, 1, 0)
end

local function sprint(input, gameProcessed)
    if input.KeyCode == Enum.KeyCode.LeftShift and not gameProcessed then
        sprinting = not sprinting
        if sprinting then
            humanoid.WalkSpeed = humanoid.WalkSpeed * 1.5
        else
            humanoid.WalkSpeed = humanoid.WalkSpeed / 1.5
        end
    end
end

userinputservice.InputBegan:Connect(sprint)

while true do
    task.wait(0.1)
    if sprinting and currentSprint > 0 then
        currentSprint = currentSprint - sprintDrainRate
        if currentSprint < 0 then
            currentSprint = 0
            sprinting = false
            humanoid.WalkSpeed = humanoid.WalkSpeed / 1.5
        end
    elseif not sprinting and currentSprint < maxSprint then
        currentSprint = currentSprint   sprintRechargeRate
        if currentSprint > maxSprint then
            currentSprint = maxSprint
        end
    end
    updateSprintBar()
end

"make a local starterplayer script that shows the local player body like torso and legs except for the arms if zoomed into firstperson"

-- LocalScript in StarterPlayerScripts 
local player = game.Players.LocalPlayer
local humanoid = player.Character:WaitForChild("Humanoid")

local function onCameraSubjectChanged()
    local cameraSubject = game.Workspace.CurrentCamera.CameraSubject
    local isHumanoid = (cameraSubject:IsA("Humanoid"))
    if isHumanoid then
        local character = cameraSubject.Parent
        if character == player.Character then
            local head = character:FindFirstChild("Head")
            local torso = character:FindFirstChild("Torso")
            local leftArm = character:FindFirstChild("Left Arm")
            local rightArm = character:FindFirstChild("Right Arm")
            local leftLeg = character:FindFirstChild("Left Leg")
            local rightLeg = character:FindFirstChild("Right Leg")
            if head and torso and leftArm and rightArm and leftLeg and rightLeg then
                local isZoomedIn = (game.Workspace.CurrentCamera.FieldOfView < 20)
                leftArm.Transparency = isZoomedIn and 1 or 0
                rightArm.Transparency = isZoomedIn and 1 or 0
            end
        end
    end
end

game.Workspace.CurrentCamera:GetPropertyChangedSignal("CameraSubject"):Connect(onCameraSubjectChanged)
onCameraSubjectChanged()

"Make a checkpoint spawner"

"the player touched a part will die. Respawan after 1 second and add comment to code"

"play animation"

"make it get descendants of decsendants etc"

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

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

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

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

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

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

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

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

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

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

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

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

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

debounce = false
end

mouse.Button1Down:Connect(onMouseDown)
```

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

"Make me a script where I can throw the football as deep dimes to my wide receiver Where the opposing team can't get it but my wide receiver can get it."

-- local script in a tool named Football 
local tool = script.Parent
local playersService = game:GetService("Players")
local localPlayer = playersService.LocalPlayer
local receiverTag = "WideReceiver"
local opponentTag = "Opponent"

local function throwFootball()
    local football = tool.Handle
    local receiver
    local minDistance = math.huge

for _, player in ipairs(playersService:GetPlayers()) do
        if player ~= localPlayer and player.Character and player.Character:FindFirstChild(receiverTag) then
            local distance = (player.Character.HumanoidRootPart.Position - localPlayer.Character.HumanoidRootPart.Position).magnitude
            if distance < minDistance then
                minDistance = distance
                receiver = player.Character
            end
        end
    end

if receiver then
        local targetPosition = receiver.HumanoidRootPart.Position + Vector3.new(0, 5, 0)
        local throwDirection = (targetPosition - football.Position).Unit
        local throwSpeed = 100

football.BodyVelocity.Velocity = throwDirection * throwSpeed
        football.BodyAngularVelocity.AngularVelocity = Vector3.new(0, 100, 0)
    end
end

local function onEquipped()
    tool.Activated:Connect(throwFootball)
end

tool.Equipped:Connect(onEquipped)

-- Add a StringValue named WideReceiver to your wide receiver's character model and a StringValue named Opponent to the opposing team's character models. This will help the script identify the wide receiver and opponents.

"make the imagelabel THAT IS named keep appearing and disappearing and will stop and go invisible after the player holds s and f at the same time on there keyboard"

"make a script where when Harlandroblox says !open it will bring a gui on his screen with a list of all the players names in the game and if Harlandroblox clicks one of the names the player will explode"

"whenever part is touched, its speed should increase"

"make a button to switch between running and walking"

"create a script inside a inside a tool that teleports player to spawn when players left clicks while the tool is equipped."

"When a player joins the game, the provided code creates a part in the workspace. The part is then added to the Hitboxes folder and its properties are adjusted. Additionally, the part is cloned for each new player and exclusively assigned to them."

```lua
-- server script (ServerScriptService) 
game.Players.PlayerAdded:Connect(function(player)
    local part = Instance.new("Part", game.Workspace)
    part.Name = "PlayerPart"
    part.Size = Vector3.new(4, 1, 4)
    part.Position = Vector3.new(0, 50, 0)
    part.Anchored = true
    
    -- Adjust properties as needed 
    part.Color = Color3.new(1, 0, 0) -- Example: Changing color to red
    
    -- Create or ensure Hitboxes folder exists 
    local hitboxesFolder = game.Workspace:FindFirstChild("Hitboxes")
    if not hitboxesFolder then
        hitboxesFolder = Instance.new("Folder", game.Workspace)
        hitboxesFolder.Name = "Hitboxes"
    end
    
    -- Move part to Hitboxes folder 
    part.Parent = hitboxesFolder
    
    -- Clone part for the player 
    local playerPart = part:Clone()
    playerPart.Parent = game.Workspace
    playerPart.Name = player.Name .. "'s Part" -- Naming the part after the player
    -- Adjust additional properties or add scripts to playerPart if needed
end)
```

"Make a kick script which let's you pick a player to kick"

-- This is a community contribution and has not been generated by ScripterAI
local Players = game:GetService("Players")
local owner = game.CreatorId

Players.PlayerAdded:Connect(function(player)
player.Chatted:Connect(function(message)
if string.sub(message, 1, 6) == "!kick " then
local playerToKick = string.sub(message, 7)
local foundPlayer = false

if playerToKick == "me" then
playerToKick = player.Name
end

for i, p in pairs(Players:GetPlayers()) do
if p.Name == playerToKick then
if player.userId == owner then
local confirmation = Instance.new("ScreenGui")
local confirmFrame = Instance.new("Frame")
local confirmText = Instance.new("TextLabel")
local confirmButton = Instance.new("TextButton")

confirmation.Name = "ConfirmationScreen"
confirmation.Parent = player.PlayerGui

confirmFrame.Name = "ConfirmFrame"
confirmFrame.Parent = confirmation
confirmFrame.Size = UDim2.new(0, 300, 0, 175)
confirmFrame.AnchorPoint = Vector2.new(0.5, 0.5)
confirmFrame.Position = UDim2.new(0.5, 0, 0.5, 0)
confirmFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 0)
confirmFrame.BorderSizePixel = 2
confirmFrame.BorderColor3 = Color3.fromRGB(255, 165, 0)

confirmText.Name = "ConfirmText"
confirmText.Parent = confirmFrame
confirmText.Size = UDim2.new(1, -40, 0, 80)
confirmText.Position = UDim2.new(0, 20, 0, 20)
confirmText.Text = "Uh oh!\nAre you sure you want to kick\n" .. playerToKick .. "?"
confirmText.TextColor3 = Color3.fromRGB(255, 0, 0)
confirmText.TextWrapped = true
confirmText.TextScaled = true
confirmText.Font = Enum.Font.Cartoon
confirmText.TextSize = 20

confirmButton.Name = "ConfirmButton"
confirmButton.Parent = confirmFrame
confirmButton.Size = UDim2.new(1, -40, 0, 50)

confirmButton.Position = UDim2.new(0, 20, 0, 110)
confirmButton.Text = "Kick 'em out!"
confirmButton.TextColor3 = Color3.fromRGB(255, 255, 255)
confirmButton.BackgroundColor3 = Color3.fromRGB(255, 165, 0)
confirmButton.BorderSizePixel = 2
confirmButton.BorderColor3 = Color3.fromRGB(255, 0, 0)
confirmButton.Font = Enum.Font.Cartoon
confirmButton.TextSize = 20

confirmButton.MouseButton1Click:Connect(function()
p:Kick("Guess I thought you were smelly lol")
confirmation:Destroy()
end)

foundPlayer = true
break
end
end
end

if not foundPlayer then
player.Chat:Chat("Could not find player " .. playerToKick)
end
end
end)
end)

"make a server script that puts a msg.txt for 5 secs that says Press the RED button at the back of the house for a cookie"

"when a player walks into my Part called pmurd it will go for 50 seconds then come back when you walk into it it will bring a gui on the middle of the screen with the names of all the players in the server you can only have one gui at a time and when you click one of the names it will kill that player then the gui will go off the screen when my part called pmurd is gone you can not use it and when you pick the person to kill it will tp you to my part called bbb"

-- server script for pmurd part 
local part = game.Workspace.pmurd
local debounce = true

local function onTouched(otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player and debounce then
        debounce = false
        part.Transparency = 1
        part.CanCollide = false
        local gui = Instance.new("ScreenGui")
        gui.Name = "PlayerListGui"
        gui.Parent = player.PlayerGui

local function createButton(playerName)
            local button = Instance.new("TextButton")
            button.Size = UDim2.new(0, 100, 0, 30)
            button.Text = playerName
            button.MouseButton1Click:Connect(function()
                local target = game.Players:FindFirstChild(playerName)
                if target then
                    target.Character.Humanoid.Health = 0
                    player.Character.HumanoidRootPart.CFrame = game.Workspace.bbb.CFrame
                    gui:Destroy()
                end
            end)
            return button
        end

local yPosition = 0
        for _, p in ipairs(game.Players:GetPlayers()) do
            local button = createButton(p.Name)
            button.Position = UDim2.new(0.5, -50, 0, yPosition)
            button.Parent = gui
            yPosition = yPosition + 40
        end

wait(50)
        part.Transparency = 0
        part.CanCollide = true
        debounce = true
    end
end

part.Touched:Connect(onTouched)

"Create a script I created a tool with a part. Make sure that the part follows my arm, so I am actually holding it. Make sure that if I click, the part shoots a bullet that does damage. Place the script in part."

"teleport command to a part called Shop"

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

--
1. Create a local script in the Workspace and name it "PartSpawner"
2. Copy and paste the code below into the script

-- Create a boolean variable to keep track of whether the script should be running or not
local running = true

-- Create a function to spawn a part
local function spawnPart()
	-- Create the part
	local part = Instance.new("Part")
	part.Parent = game.Workspace
	
	-- Set the part's position to a random position
	part.Position = Vector3.new(math.random(-100, 100), 0, math.random(-100, 100))
end

-- Create a function to check for the "stop" command
local function checkForStop()
	-- Loop through all of the players
	for _, player in pairs(game.Players:GetPlayers()) do
		-- Check if the player's last chat message was "stop"
		if player.PlayerGui.Chat.ChatHistory.History.Text == "stop" then
			-- Set the running variable to false
			running = false
		end
	end
end

-- Create a loop that runs until the running variable is false
while running do
	-- Spawn a part
	spawnPart()
	
	-- Check for the stop command
	checkForStop()
	
	-- Wait 1 second
	wait(1)
end

"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

"Noclip script"

"make a script where if someone say's "hi" in the chat, a frame named "NOTAUTHORIZED" Slowly appears then slowly goes away and then after it goes away the player gets kicked"

"local module = { typea = "Helmet", WhiteLists = { }, } return module make the role Rifleman whitelisted"

"make a proximityprompt inside of a player and then put sounds that play upon starting the proximity prompt"

"Make a script that teleports a player when they touch a part to another part, it just replaces the players humanoidrootpart location with the parts position."

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

"make all parts but humanoids and players give the value of the value inside of the part when its destroyed when touching the part then destroy the part also make all lime green parts get affected by this script also give the amount of money in the value into leaderstats money value and use int value"

"create money simulator"

-- server script for spawning money 
while true do 
        local money = Instance.new("Part")
        money.Parent = game.Workspace
        
        local randomX = math.random(-100, 100)
        local randomZ = math.random(-100, 100)
        
        money.Position = Vector3.new(randomX, 50, randomZ)
        money.Color = Color3.fromRGB(255, 215, 0)
        money.Size = Vector3.new(2, 2, 2)
        money.Shape = Enum.PartType.Ball
        
        task.wait(10)
end

-- local script for collecting money 
local player = game.Players.LocalPlayer
local moneyCollected = 0

function collectMoney(money)
    money:Destroy()
    moneyCollected = moneyCollected + 1
    player.leaderstats.Money.Value = player.leaderstats.Money.Value + 10
end

for _, money in pairs(game.Workspace:GetChildren()) do
    if money:IsA("Part") and money.Color == Color3.fromRGB(255, 215, 0) then
        money.Touched:Connect(function() collectMoney(money) end)
    end
end

player.leaderstats.Money.Changed:Connect(function(value)
    if value >= 1000 then
        game.Players.LocalPlayer:Kick("You have won the game!")
    end
end)

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

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

"make individual leaderboard stats for Stage and Rebirths, make datastores for Stage and Rebirths that saves and loads the player's data. Make rebirth optional once the player is stage 65."

-- server script (ServerScriptService) 
local DataStoreService = game:GetService("DataStoreService")
local stageDataStore = DataStoreService:GetDataStore("StageData")
local rebirthDataStore = DataStoreService:GetDataStore("RebirthData")

game.Players.PlayerAdded:Connect(function(player)
    local folder = Instance.new("Folder")
    folder.Name = "leaderstats"
    folder.Parent = player
    
    local stageValue = Instance.new("IntValue")
    stageValue.Name = "Stage"
    stageValue.Parent = folder
    
    local rebirthValue = Instance.new("IntValue")
    rebirthValue.Name = "Rebirths"
    rebirthValue.Parent = folder
    
    local stageData
    local success, errorMessage = pcall(function()
        stageData = stageDataStore:GetAsync(player.UserId)
    end)
    
    if success and stageData then
        stageValue.Value = stageData
    else
        stageValue.Value = 1
    end
    
    local rebirthData
    local success, errorMessage = pcall(function()
        rebirthData = rebirthDataStore:GetAsync(player.UserId)
    end)
    
    if success and rebirthData then
        rebirthValue.Value = rebirthData
    else
        rebirthValue.Value = 0
    end
    
    player.Chatted:Connect(function(message)
        if message:lower() == "rebirth" and stageValue.Value >= 65 then
            stageValue.Value = 1
            rebirthValue.Value = rebirthValue.Value + 1
        end
    end)
end)

game.Players.PlayerRemoving:Connect(function(player)
    local stageData = player.leaderstats.Stage.Value
    local rebirthData = player.leaderstats.Rebirths.Value
    
    local success, errorMessage = pcall(function()
        stageDataStore:SetAsync(player.UserId, stageData)
    end)
    if not success then
        warn("Failed to save stage data for " .. player.Name)
    end
    
    local success, errorMessage = pcall(function()
        rebirthDataStore:SetAsync(player.UserId, rebirthData)
    end)
    if not success then
        warn("Failed to save rebirth data for " .. player.Name)
    end
end)

"Equip players with a sword upon spawning"

"the npc should get within 5 units of the player before attempting to attack"

In the `attackPlayer` function, you can add a condition to check if the NPC is within 5 units of the player before attempting to attack. If the NPC is not within 5 units of the player, it will continue moving towards the player until it is within range. Here's how you can modify the function:

```lua
-- Function to attack a player
local function attackPlayer(player)
    isAttacking = true
    npc.Humanoid:MoveTo(player.Character.HumanoidRootPart.Position)
    while (player.Character.HumanoidRootPart.Position - npc.HumanoidRootPart.Position).Magnitude > 5 do
        wait(0.1) -- wait for a short time before checking the distance again
    end
    npc.Humanoid:LoadAnimation(npc.Animations.AttackAnimation):Play()
    wait(2) -- attack cooldown
    if (player.Character.HumanoidRootPart.Position - npc.HumanoidRootPart.Position).Magnitude < 5 then
        player.Character.Humanoid:TakeDamage(10)
    end
    isAttacking = false
end
```

This will ensure that the NPC gets within 5 units of the player before attempting to attack.

"teleport chat command for only players who has bool value of Guardian."

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

local function onPlayerChatted(player, message)
    local args = string.split(message, " ")
    if args[1] == "!teleport" and player.Guardian.Value then
        if args[2] and args[3] then
            local targetPlayer = Players:FindFirstChild(args[2])
            local destinationPlayer = Players:FindFirstChild(args[3])
            if targetPlayer and destinationPlayer then
                local targetCharacter = targetPlayer.Character
                local destinationCharacter = destinationPlayer.Character
                if targetCharacter and destinationCharacter then
                    local destinationPosition = destinationCharacter.HumanoidRootPart.Position
                    targetCharacter.HumanoidRootPart.CFrame = CFrame.new(destinationPosition)
                end
            end
        end
    end
end

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

"when a player clicks e on there keyboard they will get 10000 walkspeed for 20 seconds"

"when you touch the block you will enter a really random roblox game"

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

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

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

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

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

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

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

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

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

"The problem with this script is that when the alarm turns off, the lights do not return back to their original brightness of 3. How can this script be fixed?"

The issue lies in the restoreLights function. The while loop is not correctly increasing the brightness of the lights. Here's the corrected script:

```lua
-- New function to gradually return the lights back to their original state
local function restoreLights()
	for _, part in ipairs(lights) do
		local light = part:FindFirstChildWhichIsA('Light') -- find the light within the part
		if light then -- make sure the light was found before proceeding
			while light.Brightness < 3 do -- while the brightness is less than 3
				light.Brightness = light.Brightness + 0.1 -- increase the brightness by 0.1
				task.wait(0.1) -- wait for 0.1 seconds
			end
			while light.Color ~= originalColors[light] do -- while the color is not the original color
				light.Color = light.Color:Lerp(originalColors[light], 0.1) -- gradually change the color back to its original color
				task.wait(0.1) -- wait for 0.1 seconds
			end
		end
	end
end

-- Call the restoreLights function after the alarm stops
alarm.Stopped:Connect(restoreLights)
```

The line `light.Brightness = light.Brightness   0.1` was changed to `light.Brightness = light.Brightness + 0.1` to correctly increase the brightness.

"make me an voice chat script"

"make a script for an existing text label that displays and starts 5 minute countdown when the player touches the part called GearPart. text says "Lucky Block Ready" after the 5 minutes. touching the part during the countdown does not interrupt it."

"create a advanced swordscript for a sword tool"

-- local script 
local sword = script.Parent
local attack = false

sword.Equipped:Connect(function(mouse)
	mouse.Button1Down:Connect(function()
		attack = true
	end)
	mouse.Button1Up:Connect(function()
		attack = false
	end)
end)

sword.Unequipped:Connect(function()
	attack = false
end)

game.Players.PlayerAdded:Connect(function(player)
	player.CharacterAdded:Connect(function(character)
		character.ChildAdded:Connect(function(child)
			if child:IsA("Tool") and child.Name == "Sword" then
				child.Equipped:Connect(function(mouse)
					mouse.Button1Down:Connect(function()
						attack = true
					end)
					mouse.Button1Up:Connect(function()
						attack = false
					end)
				end)
				
				child.Unequipped:Connect(function()
					attack = false
				end)
			end
		end)
	end)
end)

while wait(0.1) do
	if attack then
		local ray = Ray.new(sword.Handle.Position, (sword.Handle.CFrame.lookVector * 10))
		local hit, position = workspace:FindPartOnRayWithIgnoreList(ray, {sword.Parent})
		if hit and hit.Parent:FindFirstChild("Humanoid") then
			hit.Parent.Humanoid:TakeDamage(10)
		end
	end
end

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

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

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

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

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

"change health of a player on part touch"

"write a script that makes my pov change smoothly in dependance of where my mouse is and tell me where it goes"

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

local function updateCamera()
    local mousePos = Vector2.new(mouse.X, mouse.Y)
    local screenSize = Vector2.new(game:GetService("GuiService"):GetScreenResolution().X, game:GetService("GuiService"):GetScreenResolution().Y)
    local screenCenter = screenSize / 2
    local offset = (mousePos - screenCenter) / screenSize

local targetX = (offset.X * 180) - 90
    local targetY = (offset.Y * 180) - 90

local currentX = camera.CFrame:ToEulerAnglesXYZ().X
    local currentY = camera.CFrame:ToEulerAnglesXYZ().Y

local smoothedX = currentX + (targetX - currentX) * 0.1
    local smoothedY = currentY + (targetY - currentY) * 0.1

camera.CFrame = CFrame.Angles(smoothedX, smoothedY, 0) * CFrame.new(camera.Focus.Position)
end

game:GetService("RunService").RenderStepped:Connect(updateCamera)

-- Place this script in StarterPlayerScripts folder in Roblox Studio. It will smoothly change the player's point of view based on the mouse position on the screen.

"give the player a Crown accessory from server tool it will add it to their character when the player touches a part named Roundspawn the Crown will stay on the player for 10 seconds if those 10 run outs if the player stays with the crown for 10 seconds 5 times give 1 Win"

```lua
-- server script to handle Crown accessory and wins 
local roundSpawn = game.Workspace.Roundspawn
local crownAccessoryId = "CROWN_ACCESSORY_ID" -- Replace CROWN_ACCESSORY_ID with the actual asset ID of the crown accessory
local winsNeeded = 5
local crownDuration = 10

local function onTouched(otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player then
        local leaderstats = player:FindFirstChild("leaderstats")
        local crownTime = leaderstats and leaderstats:FindFirstChild("CrownTime")
        local wins = leaderstats and leaderstats:FindFirstChild("Wins")
        
        if crownTime and wins then
            local accessory = game:GetService("InsertService"):LoadAsset(crownAccessoryId):GetChildren()[1]
            accessory.Parent = player.Character
            
            crownTime.Value = crownTime.Value + 1
            
            wait(crownDuration)
            
            if accessory and accessory.Parent then
                accessory:Destroy()
                
                if crownTime.Value >= winsNeeded then
                    wins.Value = wins.Value + 1
                    crownTime.Value = 0 -- Reset crown time after winning
                end
            end
        end
    end
end

roundSpawn.Touched:Connect(onTouched)

-- Make sure to setup leaderstats for each player to track CrownTime and Wins 
game.Players.PlayerAdded:Connect(function(player)
    local leaderstats = Instance.new("Folder")
    leaderstats.Name = "leaderstats"
    leaderstats.Parent = player
    
    local crownTime = Instance.new("IntValue")
    crownTime.Name = "CrownTime"
    crownTime.Value = 0
    crownTime.Parent = leaderstats
    
    local wins = Instance.new("IntValue")
    wins.Name = "Wins"
    wins.Value = 0
    wins.Parent = leaderstats
end)
```
This script assumes you have a part named `Roundspawn` in your Workspace. It also assumes that the player has a `leaderstats` folder with `CrownTime` and `Wins` as `IntValue` objects to track the number of times the player has held the crown for 10 seconds and the number of wins, respectively. Replace `CROWN_ACCESSORY_ID` with the actual asset ID of the crown accessory you want to use.

"make a /size command "number to size""

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

"Make a loading screen and the stop the character from autoloading in, only after they click the play button will their character load in the game"

"give me a good idea for a game and also script it for me"

Idea: A treasure hunt game where players have to find hidden treasures on an island filled with obstacles and challenges.

To get started, you can create a script for spawning treasures at random locations on the island and a script for detecting when a player finds a treasure.

-- Server script for spawning treasures
local spawnPoints = {} -- Add Vector3 positions for spawn points on the island
local treasureTemplate = game.ServerStorage.Treasure -- Store a treasure part in ServerStorage

while true do
    local spawnPoint = spawnPoints[math.random(1, #spawnPoints)]
    local treasure = treasureTemplate:Clone()
    treasure.Parent = game.Workspace
    treasure.Position = spawnPoint
    wait(60) -- Adjust the time between spawns as needed
end

-- Script for detecting when a player finds a treasure
local part = script.Parent

local function onTreasureFound(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player then
        player.leaderstats.Treasures.Value = player.leaderstats.Treasures.Value + 1
        part:Destroy()
    end
end

part.Touched:Connect(onTreasureFound)

You can expand this idea by adding a timer, leaderboard, and various challenges and obstacles players must overcome to find the treasures. You can also create a shop where players can spend their collected treasures on upgrades and cosmetics.

"create code for a serverscript which listens for when a remote event is fired named ClickRemote when this is fired check if the player own two gamepasses if they do award them 4x currency if they own one of the gamepasses award 2x currency if not own any give 2 currency to their leaderstat value"

```lua
-- server script (ServerScriptService) 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local Players = game:GetService("Players")
local GamePassService = game:GetService("GamePassService")

local clickRemote = ReplicatedStorage:WaitForChild("ClickRemote")

local function awardCurrency(player)
    local ownsFirstGamePass = GamePassService:UserOwnsGamePassAsync(player.UserId, 123456) -- First game pass ID
    local ownsSecondGamePass = GamePassService:UserOwnsGamePassAsync(player.UserId, 7891011) -- Second game pass ID
    local currencyMultiplier = 1
    
    if ownsFirstGamePass and ownsSecondGamePass then
        currencyMultiplier = 4
    elseif ownsFirstGamePass or ownsSecondGamePass then
        currencyMultiplier = 2
    else
        currencyMultiplier = 1
    end
    
    local currencyToAward = 2 * currencyMultiplier
    local leaderstats = player:FindFirstChild("leaderstats")
    local currency = leaderstats and leaderstats:FindFirstChild("Currency")
    if currency then
        currency.Value = currency.Value + currencyToAward
    end
end

clickRemote.OnServerEvent:Connect(awardCurrency)
```

"make a roblox exploit script that copies games and then launches your roblox studio and inserts the copied game"

"Can you write code that turns all players green on execute and is visible to all players?"

"Can you write a system for money?"

Certainly! Here's a simple money system that includes a leaderboard to display player's money.

1. First, create a server script in ServerScriptService and add the following code to create a leaderboard for players:

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

local function onPlayerAdded(player)
    -- Create a folder to store player's stats
    local leaderstats = Instance.new("Folder")
    leaderstats.Name = "leaderstats"
    leaderstats.Parent = player

-- Create a money value for the player
    local money = Instance.new("IntValue")
    money.Name = "Money"
    money.Value = 0
    money.Parent = leaderstats
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- Add leaderboard to players who are already in the game
for _, player in ipairs(Players:GetPlayers()) do
    onPlayerAdded(player)
end
```

2. Now, let's create a simple system to award money to players. In this example, we'll create a part that gives players money when they touch it. Create a new part in the Workspace and add a script to it with the following code:

```lua
local part = script.Parent

local function onTouched(hit)
    local player = game.Players:GetPlayerFromCharacter(hit.Parent)
    if player then
        local leaderstats = player:FindFirstChild("leaderstats")
        if leaderstats then
            local money = leaderstats:FindFirstChild("Money")
            if money then
                money.Value = money.Value + 10 -- Change this value to the amount of money you want to give
            end
        end
    end
end

part.Touched:Connect(onTouched)
```

Now, when a player touches the part, they will receive 10 money (you can change this value to your desired amount). Their money will be displayed in the leaderboard created in step 1. You can expand this system to include more ways for players to earn money or spend it on in-game items.

"if click tool then enable part if click again disable part"

"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

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

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

local function createFireball()
    local fireball = Instance.new("Part")
    fireball.Name = "Fireball"
    fireball.Shape = "Ball"
    fireball.Size = Vector3.new(2, 2, 2)
    fireball.BrickColor = BrickColor.new("Bright red")
    fireball.Material = "Neon"
    fireball.Parent = workspace
    fireball.Position = player.Character.HumanoidRootPart.Position + Vector3.new(0, 2, 0)

local fire = Instance.new("Fire", fireball)
    fire.Size = 2
    fire.Heat = 10

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

game:GetService("Debris"):AddItem(fireball, 3)
end

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

mouse.KeyDown:Connect(onKeyDown)

"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 basic laser eye tool. The VFX part will be up to you to customize as needed. Here's a script for a tool that shoots laser beams from the player's eyes when the mouse is held down for 2 seconds:

-- Local Script inside a Tool
local tool = script.Parent
local player = game.Players.LocalPlayer
local character
local mouse = player:GetMouse()
local holding = false
local holdTime = 0

local function shootLaser()
    if character and character:FindFirstChild("Head") then
        for _, eye in ipairs({"LeftEye", "RightEye"}) do
            local eyeAttachment = character.Head:FindFirstChild(eye)
            if eyeAttachment then
                local laser = Instance.new("Part")
                laser.BrickColor = BrickColor.new("Bright red")
                laser.Material = "Neon"
                laser.Anchored = true
                laser.CanCollide = false
                laser.Size = Vector3.new(0.3, 0.3, 100)
                laser.CFrame = eyeAttachment.WorldCFrame * CFrame.new(0, 0, -50)
                laser.Parent = workspace

local destroyLaser = function()
                    laser:Destroy()
                end
                delay(0.5, destroyLaser)
            end
        end
    end
end

local function onMouseDown()
    holding = true
    holdTime = 0
    while holding do
        wait(1)
        holdTime = holdTime + 1
        if holdTime >= 2 then
            shootLaser()
        end
    end
end

local function onMouseUp()
    holding = false
end

tool.Equipped:Connect(function()
    character = player.Character
    mouse.Button1Down:Connect(onMouseDown)
    mouse.Button1Up:Connect(onMouseUp)
end)

tool.Unequipped:Connect(function()
    onMouseUp()
end)

This script assumes that you have two attachments named "LeftEye" and "RightEye" in the player's Head. You can create these attachments by adding them to the player's Head and positioning them at the eye positions.

"teleport part on touch"

"make it so if there is something in your way you jump"

local pfs = game:GetService("PathfindingService")
local player = game.Players.LocalPlayer
local closestPlayer = nil

while true do 
	for _, otherPlayer in pairs(game.Players:GetPlayers()) do
		if otherPlayer ~= player then
			if closestPlayer == nil or (otherPlayer.Character.PrimaryPart.Position - player.Character.PrimaryPart.Position).magnitude < (closestPlayer.Character.PrimaryPart.Position - player.Character.PrimaryPart.Position).magnitude then
				closestPlayer = otherPlayer
			end
		end
	end
	
	local path = pfs:CreatePath()
	path:ComputeAsync(player.Character.PrimaryPart.Position, closestPlayer.Character.PrimaryPart.Position)
	
	for _, waypoint in pairs(path:GetWaypoints()) do
		local ray = Ray.new(player.Character.PrimaryPart.Position, (waypoint.Position - player.Character.PrimaryPart.Position).unit * 5)
		local part, position = workspace:FindPartOnRayWithIgnoreList(ray, {player.Character.PrimaryPart})
		
		if part then
			player.Character.Humanoid:Jump()
		end
		
		player.Character.Humanoid:MoveTo(waypoint.Position)
		player.Character.Humanoid.MoveToFinished:Wait()
	end
	
	wait(1)
end

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

"make a script that works inside the part that changes the modelname to what the value inside of the configuration is and make it update every frame"

"make all letter 'e' change nto the letter 3"

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

"create a combat sword script inside a tool that plays 2 different swing animation when players left clicks twice and the damaged is based on the damage value located inside the tool. and it damages a NPC with a humanoid called Enemy and gives a leaderstats called Kills when NPC dies."

-- Server Script 
local tool = script.Parent
local damageValue = tool:WaitForChild("DamageValue")
local swing1 = tool:WaitForChild("Swing1")
local swing2 = tool:WaitForChild("Swing2")
local debounce = false
local clickCount = 0

tool.Activated:Connect(function()
    if debounce == false then
        debounce = true
        clickCount = clickCount + 1
        if clickCount == 1 then
            tool.Handle.AnimationId = swing1.AnimationId
        elseif clickCount == 2 then
            tool.Handle.AnimationId = swing2.AnimationId
            clickCount = 0
        end
        wait(1)
        debounce = false
    end
end)

tool.Touched:Connect(function(hit)
    local humanoid = hit.Parent:FindFirstChild("Humanoid")
    if humanoid and humanoid.Name == "Enemy" then
        humanoid:TakeDamage(damageValue.Value)
        if humanoid.Health <= 0 then
            local player = game.Players:GetPlayerFromCharacter(tool.Parent.Parent)
            player.leaderstats.Kills.Value = player.leaderstats.Kills.Value + 1
        end
    end
end)

"make a roblox lua script that makes it so whatever you look at and if the player presses shift c they can copy that object and paste it with shift v basicaly a copy paste script"

"create a lootbox system with tables"

-- server script 
-- Create a table to store lootbox data
local lootboxes = {}

-- Create a function to generate lootboxes
local function generateLootbox()
	-- Generate a random position
	local x = math.random(-100, 100)
	local z = math.random(-100, 100)
	local pos = Vector3.new(x, 50, z)

-- Create a lootbox
	local lootbox = Instance.new("Part")
	lootbox.Parent = game.Workspace
	lootbox.Position = pos
	lootbox.Size = Vector3.new(2, 2, 2)

-- Add the lootbox to the lootboxes table
	table.insert(lootboxes, lootbox)
end

-- Generate the lootboxes
for i = 1, 10 do
	generateLootbox()
end

-- Create a function to open the lootboxes
local function openLootbox(player, lootbox)
	-- Check if the lootbox is valid
	if not lootbox then return end

-- Remove the lootbox from the lootboxes table
	for i, v in ipairs(lootboxes) do
		if v == lootbox then
			table.remove(lootboxes, i)
			break
		end
	end

-- Destroy the lootbox
	lootbox:Destroy()

-- Give the player a random reward
	local rewards = {
		"Coin",
		"Gem",
		"Hat",
		"Shirt",
		"Pants"
	}
	local reward = rewards[math.random(#rewards)]
	player.leaderstats[reward].Value = player.leaderstats[reward].Value + 1
end

-- Create a function to handle lootbox touches
local function onLootboxTouched(otherPart)
	-- Check if the part is a humanoid
	local humanoid = otherPart.Parent:FindFirstChildWhichIsA("Humanoid")
	if not humanoid then return end

-- Get the player
	local player = game.Players:GetPlayerFromCharacter(humanoid.Parent)
	if not player then return end

-- Open the lootbox
	openLootbox(player, script.Parent)
end

-- Connect the touched event
script.Parent.Touched:Connect(onLootboxTouched)

"create a script that gives a certain player using the players name every item in the game located in a folder called ITEMS in replicatedstorage"

"Noclip script"

"make a script where you get tped to one of my parts Part1 Part2 Part3 Part4 Part5 Part6 Part7 Part8 Part9 when you do it will ask you a question at the top of the screen the question is what does Harland want to be when he is older then there is a gui at the bottom of your screen and you can input awnsers if you say dev then whatever part you get tped to 3 of my parts called bbl will go ontop of eachother and the player will be tped ontop of them my part called bbl is in ReplicatedStorage"

-- local script 
local Player = game:GetService('Players').LocalPlayer
local ReplicatedStorage = game:GetService('ReplicatedStorage')
local bbl = ReplicatedStorage:WaitForChild('bbl')

local function teleportToRandomPart()
    local parts = {'Part1', 'Part2', 'Part3', 'Part4', 'Part5', 'Part6', 'Part7', 'Part8', 'Part9'}
    local randomPart = game.Workspace[parts[math.random(1, #parts)]]
    local character = Player.Character
    character:SetPrimaryPartCFrame(randomPart.CFrame)
    
    local questionGui = Instance.new('ScreenGui', Player.PlayerGui)
    local questionText = Instance.new('TextLabel', questionGui)
    questionText.Text = 'What does Harland want to be when he is older?'
    questionText.Size = UDim2.new(1, 0, 0, 30)
    questionText.Position = UDim2.new(0, 0, 0, 0)
    
    local answerGui = Instance.new('TextBox', questionGui)
    answerGui.Size = UDim2.new(0.3, 0, 0.05, 0)
    answerGui.Position = UDim2.new(0.35, 0, 0.95, 0)
    answerGui.PlaceholderText = 'Type your answer here'
    
    local function checkAnswer()
        if answerGui.Text:lower() == 'dev' then
            local bbl1 = bbl:Clone()
            local bbl2 = bbl:Clone()
            local bbl3 = bbl:Clone()
            
            bbl1.Parent = game.Workspace
            bbl2.Parent = game.Workspace
            bbl3.Parent = game.Workspace
            
            bbl1.Position = randomPart.Position + Vector3.new(0, bbl1.Size.Y, 0)
            bbl2.Position = bbl1.Position + Vector3.new(0, bbl2.Size.Y, 0)
            bbl3.Position = bbl2.Position + Vector3.new(0, bbl3.Size.Y, 0)
            
            character:SetPrimaryPartCFrame(bbl3.CFrame + Vector3.new(0, character.HumanoidRootPart.Size.Y / 2 + 5, 0))
        end
        questionGui:Destroy()
    end
    
    answerGui.FocusLost:Connect(checkAnswer)
end

teleportToRandomPart()

"make a moving dad"

-- server script 
local dad = Instance.new("Model")
dad.Name = "Dad"
dad.Parent = game.Workspace

local humanoid = Instance.new("Humanoid")
humanoid.Parent = dad

local torso = Instance.new("Part")
torso.Name = "Torso"
torso.Anchored = false
torso.Size = Vector3.new(2, 2, 1)
torso.Parent = dad

local head = Instance.new("Part")
head.Name = "Head"
head.Anchored = false
head.Size = Vector3.new(2, 1, 1)
head.Parent = dad
head.CFrame = torso.CFrame * CFrame.new(0, 1.5, 0)

local pfs = game:GetService("PathfindingService")
local path = pfs:CreatePath()
local waypoints = {}

local function moveDad()
    local startPoint = dad.HumanoidRootPart.Position
    local endPoint = Vector3.new(math.random(-50, 50), 0, math.random(-50, 50))
    path:ComputeAsync(startPoint, endPoint)
    waypoints = path:GetWaypoints()

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

while true do
    moveDad()
    wait(2)
end

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

"A leaderboard that has "wins" and "minutes" when the player steps on the part wins it will add it to the leaderboard and they can only win once a day and count the minutes"

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

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

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

local minutes = Instance.new("IntValue")
    minutes.Name = "Minutes"
    minutes.Parent = stats
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- script for win part 
local part = script.Parent
local winCooldown = {}

local function giveWin(player)
    if not winCooldown[player.UserId] or os.time() - winCooldown[player.UserId] >= 86400 then
        player.leaderstats.Wins.Value = player.leaderstats.Wins.Value   1
        winCooldown[player.UserId] = os.time()
    end
end

local function onTouched(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player then
        giveWin(player)
    end
end

part.Touched:Connect(onTouched)

-- script for counting minutes 
local function countMinutes(player)
    while true do
        task.wait(60)
        player.leaderstats.Minutes.Value = player.leaderstats.Minutes.Value   1
    end
end

local function onPlayerAdded(player)
    countMinutes(player)
end

game.Players.PlayerAdded:Connect(onPlayerAdded)

"create a daily reward system that has a frame and has multiple button inside of it. instruction on how to set it up."

-- LocalScript in StarterGui

local player = game.Players.LocalPlayer
local dailyRewardFrame = script.Parent.DailyRewardFrame
local rewardButtons = dailyRewardFrame:GetChildren()

local function setupDailyRewards()
    local playerData = game.ServerStorage.PlayerData:FindFirstChild(player.Name)
    local lastReward = playerData.LastReward.Value
    local currentDate = os.date("*t")

if lastReward ~= currentDate.day then
        dailyRewardFrame.Visible = true
        for i, button in ipairs(rewardButtons) do
            if button:IsA("TextButton") then
                button.MouseButton1Click:Connect(function()
                    game.ReplicatedStorage.ClaimDailyReward:FireServer(i)
                    dailyRewardFrame.Visible = false
                end)
            end
        end
    else
        dailyRewardFrame.Visible = false
    end
end

setupDailyRewards()

-- ServerScript in ServerScriptService

local replicatedStorage = game:GetService("ReplicatedStorage")
local claimDailyReward = replicatedStorage:WaitForChild("ClaimDailyReward")

local function onClaimDailyReward(player, rewardIndex)
    local playerData = game.ServerStorage.PlayerData:FindFirstChild(player.Name)
    local currentDate = os.date("*t")
    
    playerData.LastReward.Value = currentDate.day
    player.leaderstats.Coins.Value = player.leaderstats.Coins.Value + (rewardIndex * 100)
end

claimDailyReward.OnServerEvent:Connect(onClaimDailyReward)

-- Instructions 
1. Create a Frame inside StarterGui and name it "DailyRewardFrame"
2. Add multiple TextButtons inside the DailyRewardFrame and set their names and text to the rewards you want to give (e.g. "Reward 1", "Reward 2", etc.)
3. Add a LocalScript inside the DailyRewardFrame and copy the first part of the code above into it.
4. Add a Folder named "PlayerData" inside ServerStorage.
5. Inside the "PlayerData" folder, create a BoolValue named "LastReward" for each player.
6. Add a RemoteEvent named "ClaimDailyReward" inside ReplicatedStorage.
7. Add a ServerScript inside ServerScriptService and copy the second part of the code above into it.

"Create a script for the R15 rig where the player ragdolls upon on death while keeping the original character"

"make rock paper siccsors"

-- server script for rock paper scissors game 
local players = game:GetService("Players")
local playerChoices = {}
local gameStarted = false
local choices = {"rock", "paper", "scissors"}
 
local function checkWinner()
    local player1 = players:GetPlayerByUserId(playerChoices[1].UserId)
    local player2 = players:GetPlayerByUserId(playerChoices[2].UserId)
    local player1Choice = playerChoices[1].Choice
    local player2Choice = playerChoices[2].Choice
 
    if player1Choice == player2Choice then
        print("Tie!")
    elseif (player1Choice == "rock" and player2Choice == "scissors") or (player1Choice == "paper" and player2Choice == "rock") or (player1Choice == "scissors" and player2Choice == "paper") then
        print(player1.Name .. " wins!")
    else
        print(player2.Name .. " wins!")
    end
 
    playerChoices = {}
    gameStarted = false
end
 
local function startGame()
    gameStarted = true
    wait(5)
    if #playerChoices == 2 then
        checkWinner()
    else
        playerChoices = {}
        gameStarted = false
    end
end
 
local function onChosen(player, choice)
    if gameStarted or not table.find(choices, choice) then return end
 
    table.insert(playerChoices, {UserId = player.UserId, Choice = choice})
 
    if #playerChoices == 2 then
        startGame()
    end
end
 
players.PlayerAdded:Connect(function(player)
    player.Chatted:Connect(function(msg)
        onChosen(player, msg)
    end)
end)

"make a hint show how much time the player has left and slowly slow down the songs pitch named 'parte' depending on how much time is left make the timer 8 mins make the player die if time runs out"

"Make a script that plays a coin sound when the player collects it with instructions"

"make a part the script is inside of double the leaderstat of the Points leaderstat"

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

"Create a VFX super cool with star effects like a kengun online effects"

"an script that will optimize every mesh to performance for mobile players and will make every mesh for pc players precise"