Haddock - Roblox Library

"make a right click drag system so you can drag stuff"

"Make an invisible player spawner that everytime you die it spawns you in the middle of the map. Make it not open the welcoming GUI and show a "BUSTED" or "WASTED" GUI show up everytime after you die."

-- script for the invisible player spawner 
local Players = game:GetService("Players")
local spawnLocation = Vector3.new(0, 5, 0) -- middle of the map

Players.PlayerAdded:Connect(function(player)
	player.CharacterAdded:Connect(function(character)
		character:WaitForChild("Humanoid").Died:Connect(function()
			wait(5) -- wait for 5 seconds before respawning
			player.RespawnLocation = Instance.new("SpawnLocation", workspace)
			player.RespawnLocation.Position = spawnLocation
			player:LoadCharacter()
			player.RespawnLocation:Destroy()
		end)
	end)
end)

-- script for the "BUSTED" or "WASTED" GUI 
local Players = game:GetService("Players")

Players.PlayerAdded:Connect(function(player)
	local gui = Instance.new("ScreenGui", player.PlayerGui)
	local textLabel = Instance.new("TextLabel", gui)
	textLabel.Text = ""
	textLabel.Size = UDim2.new(1, 0, 1, 0)
	textLabel.BackgroundTransparency = 1
	textLabel.TextScaled = true
	textLabel.Font = Enum.Font.Cartoon
	textLabel.TextColor3 = Color3.new(1, 0, 0)

player.CharacterAdded:Connect(function(character)
		character:WaitForChild("Humanoid").Died:Connect(function()
			textLabel.Text = "WASTED" -- or "BUSTED"
			wait(5)
			textLabel.Text = ""
		end)
	end)
end)

-- script for disabling the welcoming GUI 
-- Assuming the welcoming GUI is in StarterGui
game.StarterGui.WelcomingGUI.Enabled = false

"make a bomb timer for 30 seconds and tell me where to place it and how to create it"

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

local timerFrame = Instance.new("Frame", screenGui)
timerFrame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)

local timerLabel = Instance.new("TextLabel", timerFrame)
timerLabel.Text = "30"
timerLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
timerLabel.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
timerLabel.UICorner = 5

-- script for the timer 
local timeLeft = 30 -- 30 seconds

local function countdown()
    while timeLeft > 0 do
        timerLabel.Text = tostring(timeLeft) .. " seconds left"
        wait(1)
        timeLeft = timeLeft - 1
    end
    timerLabel.Text = "Boom!"
end

countdown()

-- To place the bomb timer, you need to adjust the Position property of the timerFrame. For example, timerFrame.Position = UDim2.new(0.5, 0, 0.5, 0) will place it in the center of the screen. The countdown function will start automatically when the script runs. If you want to start it manually, you can call the countdown function when needed.

"make a part rpg stats menu with gold and exp with leveling using text boxes and gui and frames and text make sure it shows up on the screen in the left also no selectable stuff and make the stats update when they kill a humanoid also make it fully work in 2 scripts"

-- Server script (Workspace) 
local Players = game:GetService("Players")

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

Players.PlayerAdded:Connect(function(player)
    local leaderstats = Instance.new("Folder")
    leaderstats.Name = "leaderstats"
    leaderstats.Parent = player
    
    local gold = Instance.new("IntValue")
    gold.Name = "Gold"
    gold.Value = 0
    gold.Parent = leaderstats
    
    local exp = Instance.new("IntValue")
    exp.Name = "Exp"
    exp.Value = 0
    exp.Parent = leaderstats
    
    local level = Instance.new("IntValue")
    level.Name = "Level"
    level.Value = 1
    level.Parent = leaderstats
    
    player.CharacterAdded:Connect(onCharacterAdded)
end)

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

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

local goldLabel = Instance.new("TextLabel", frame)
goldLabel.Text = "Gold: " .. player.leaderstats.Gold.Value
goldLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
goldLabel.BackgroundColor3 = Color3.fromRGB(0, 0, 0)

local expLabel = Instance.new("TextLabel", frame)
expLabel.Text = "Exp: " .. player.leaderstats.Exp.Value
expLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
expLabel.BackgroundColor3 = Color3.fromRGB(0, 0, 0)

local levelLabel = Instance.new("TextLabel", frame)
levelLabel.Text = "Level: " .. player.leaderstats.Level.Value
levelLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
levelLabel.BackgroundColor3 = Color3.fromRGB(0, 0, 0)

player.leaderstats.Gold.Changed:Connect(function(newGold)
    goldLabel.Text = "Gold: " .. newGold
end)

player.leaderstats.Exp.Changed:Connect(function(newExp)
    expLabel.Text = "Exp: " .. newExp
end)

player.leaderstats.Level.Changed:Connect(function(newLevel)
    levelLabel.Text = "Level: " .. newLevel
end)

"when touch a part the speed of the player is fast"

"Make an AI that walks around and makes random sounds while moving do not have it rely on parts. Have it restricted within a box"

"make a script for leaderstats called Money"

"make imagelabel1 show a specific image if the player has badg 2143148840, if they don't the badge then show locked image. make imagelabel 2 show a different image if the player has badge 2143148860, if they don't the badge then show locked image"

"Create a crouching system that uses an animation, and you c ant jump while crouching. If you press c you crouch. Make it also compatiable with other scripts."

-- local script 
local UserInputService = game:GetService("UserInputService")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local crouching = false
local canJump = true

local crouchAnimation = Instance.new("Animation")
crouchAnimation.AnimationId = "rbxassetid://YourCrouchAnimationIDHere"
local crouchAnimTrack = humanoid:LoadAnimation(crouchAnimation)

local function onInputBegan(input, gameProcessedEvent)
    if input.KeyCode == Enum.KeyCode.C and not gameProcessedEvent and not crouching then
        crouching = true
        canJump = false
        humanoid.AutoRotate = false
        crouchAnimTrack:Play()
        humanoid.JumpPower = 0
    elseif input.KeyCode == Enum.KeyCode.C and not gameProcessedEvent and crouching then
        crouching = false
        canJump = true
        humanoid.AutoRotate = true
        crouchAnimTrack:Stop()
        humanoid.JumpPower = 50
    end
end

UserInputService.InputBegan:Connect(onInputBegan)

-- Compatibility with other scripts
while true do
    if crouching then
        humanoid.Jump = false
    end
    wait()
end

"create code for a global messages system that will use the roblox chat using textchatservice and pcall functions as well this will detect when the players leaderstats Emerald Value goes up by 250 to 3500 then send a global message with the players username and amount of emeralds they got"

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

local function onPlayerAdded(player)
    local leaderstats = player:FindFirstChild("leaderstats")
    local emeralds = leaderstats and leaderstats:FindFirstChild("Emerald")

if not emeralds then return end

emeralds:GetPropertyChangedSignal("Value"):Connect(function()
        if emeralds.Value >= 250 and emeralds.Value <= 3500 then
            local success, errorMessage = pcall(function()
                TextChatService:BroadcastMessage({
                    Text = player.Name .. " has now " .. tostring(emeralds.Value) .. " emeralds!",
                    Font = Enum.Font.SourceSansBold,
                    Color = Color3.new(0, 1, 0),
                    TextSize = Enum.TextSize.Size96
                })
            end)
            if not success then
                warn("Failed to send global message: " .. errorMessage)
            end
        end
    end)
end

Players.PlayerAdded:Connect(onPlayerAdded)
```

"how to make a blender sword model work"

To make a Blender sword model work in Roblox, you need to follow these steps:

1. Export the model from Blender in FBX format.
   - In Blender, go to File > Export > FBX (.fbx).
   - Choose a location to save the file and click "Export FBX."

2. Import the model into Roblox Studio.
   - In Roblox Studio, click on the "Plugins" tab and install the "FBX Importer" plugin.
   - Click on the "Import" button in the "Plugins" tab and select the FBX file you exported from Blender.
   - The model will be imported into Roblox Studio.

3. Create a Tool object in Roblox Studio.
   - In the Explorer window, right-click on "Workspace" and select "Insert Object."
   - Choose "Tool" from the list.

4. Parent the sword model to the Tool object.
   - In the Explorer window, drag the sword model under the Tool object.

5. Add a "Handle" part to the Tool object.
   - Right-click on the Tool object and select "Insert Object."
   - Choose "Part" from the list and rename it to "Handle."
   - Move and resize the Handle part to the appropriate position on the sword model.

6. Add a script to the Tool object to handle equipping and unequipping the sword.
   - Right-click on the Tool object and select "Insert Object."
   - Choose "Script" from the list.
   - In the script, add the necessary code to handle equipping and unequipping the sword, such as changing the character's animations or modifying the character's properties.

Here's a basic example of a script for equipping and unequipping the sword:

```lua
local tool = script.Parent

tool.Equipped:Connect(function()
    local character = tool.Parent
    local humanoid = character:FindFirstChild("Humanoid")

-- Change the character's animations or properties when the sword is equipped
    -- For example, change the character's walk speed:
    humanoid.WalkSpeed = 10
end)

tool.Unequipped:Connect(function()
    local character = tool.Parent
    local humanoid = character:FindFirstChild("Humanoid")

-- Change the character's animations or properties back to normal when the sword is unequipped
    -- For example, change the character's walk speed back to the default value:
    humanoid.WalkSpeed = 16
end)
```

7. Save and test your game to ensure the sword model works as expected.

"make a script where if a player say's "Hi" in the chat a notification shows up and says "stop saying hi""

"create a code that makes the player stretch their arms like pistol punches whenever they equip a tool named "Punch" and press the left mouse button."

"create a shop gui for the owner and has Roblox gear id's and has a close button and open button and also needs the creator id"

-- local script (StarterGUI) 
local player = game.Players.LocalPlayer
local creatorId = 123456789 -- Replace with the actual creator ID
local gearIds = {12345, 67890, 111213} -- Replace with actual gear IDs

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

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

local titleLabel = Instance.new("TextLabel", background)
titleLabel.Text = "Shop"
titleLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
titleLabel.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
titleLabel.Size = UDim2.new(1, 0, 0.1, 0)

local closeButton = Instance.new("TextButton", background)
closeButton.Text = "Close"
closeButton.TextColor3 = Color3.fromRGB(255, 255, 255)
closeButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
closeButton.Size = UDim2.new(0.2, 0, 0.1, 0)
closeButton.Position = UDim2.new(0.8, 0, 0, 0)

local openButton = Instance.new("TextButton", player.PlayerGui)
openButton.Text = "Open Shop"
openButton.TextColor3 = Color3.fromRGB(255, 255, 255)
openButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
openButton.Size = UDim2.new(0.2, 0, 0.1, 0)
openButton.Position = UDim2.new(0.8, 0, 0, 0)

local function createGearButton(parent, gearId, position)
    local gearButton = Instance.new("TextButton", parent)
    gearButton.Text = "Gear " .. tostring(gearId)
    gearButton.TextColor3 = Color3.fromRGB(255, 255, 255)
    gearButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
    gearButton.Size = UDim2.new(0.2, 0, 0.1, 0)
    gearButton.Position = position
    gearButton.MouseButton1Click:Connect(function()
        game.MarketplaceService:PromptPurchase(player, gearId)
    end)
end

for i, gearId in ipairs(gearIds) do
    local position = UDim2.new(0.1, 0, 0.1 + i * 0.15, 0)
    createGearButton(background, gearId, position)
end

closeButton.MouseButton1Click:Connect(function()
    background.Visible = false
    openButton.Visible = true
end)

openButton.MouseButton1Click:Connect(function()
    background.Visible = true
    openButton.Visible = false
end)

if player.UserId == creatorId then
    background.Visible = true
    openButton.Visible = false
else
    background.Visible = false
    openButton.Visible = true
end

"Make a jumping simulator. The more you jump, the higher you jump and the jump becomes more powerful. There are leader stats that indicate your current Jump Power."

"make a sea when you say sea in chat make it so you can go through it to."

"It works, make the text fade in from the bottom of the screen, slowly move up to the top and fade away. Also, make the black screen cover the players entire screen."

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

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

local textLabel = Instance.new("TextLabel", blackScreen)
textLabel.Text = "Your text here"
textLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
textLabel.BackgroundTransparency = 1
textLabel.Position = UDim2.new(0.5, 0, 1, 0) -- start from bottom of the screen
textLabel.AnchorPoint = Vector2.new(0.5, 0.5)

-- Tweening the text to move up and fade away 
local tweenService = game:GetService("TweenService")
local tweenInfo = TweenInfo.new(5, Enum.EasingStyle.Linear, Enum.EasingDirection.Out, 0, false, 0)
local goal = {Position = UDim2.new(0.5, 0, 0, 0), TextTransparency = 1} -- move to top of the screen

local tween = tweenService:Create(textLabel, tweenInfo, goal)
tween:Play()

-- Instructions: 
1. Create a LocalScript under StarterGui.
2. Copy and paste this code into the LocalScript.
3. Replace "Your text here" with the text you want to display.
4. Run the game and the text will fade in from the bottom, move up the screen, and then fade away. The black screen will cover the player's entire screen.

"create a main menu with a camera looking at a part called Cam1 , when the player presses a start button in the main menu, the player goes in 1st person mode and the main menu disappears"

"Write an R15 ragdoll death script while keeping the original player together"

-- server script 
local function onCharacterAdded(character)
    local humanoid = character:WaitForChild("Humanoid")
    
    local function onDied()
        local joints = {}
        for _, part in ipairs(character:GetChildren()) do
            if part:IsA("BasePart") then
                for _, joint in ipairs(part:GetChildren()) do
                    if joint:IsA("JointInstance") then
                        table.insert(joints, joint)
                        joint:Destroy()
                    end
                end
            end
        end
        
        wait(2) -- ragdoll time
        
        -- restore joints
        for _, joint in ipairs(joints) do
            joint.Parent = joint.Part0
        end
        
        -- respawn character
        character:Destroy()
        game.Players:GetPlayerFromCharacter(character):LoadCharacter()
    end
    
    humanoid.Died:Connect(onDied)
end

game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(onCharacterAdded)
    if player.Character then
        onCharacterAdded(player.Character)
    end
end)

"how do i make it so when i trigger a proximity prompt then the truss/parent will be destroyed then a other truss named LADDER will then have 0 transparency and Cancollide on"

"an renderdistance script that will make an part mesh etc everything invisible depending on the players stud distance"

"can you make a dialogue box that says "wawaw" that appears when the player presses Q"

To create a dialogue box that appears when the player presses the "Q" key, you can use a LocalScript. This script should be placed in a GUI object within the player's PlayerGui. Here's how you can do it:

1. First, create a ScreenGui element inside the PlayerGui of the player.
2. Inside this ScreenGui, create a TextLabel for the dialogue box. Customize it as needed (size, position, color, etc.).
3. Then, create a LocalScript inside the ScreenGui to handle the key press event and display the dialogue.

Here's an example script:

```lua
-- LocalScript inside ScreenGui

local player = game.Players.LocalPlayer
local gui = script.Parent
local textLabel = gui.TextLabel -- Assuming you have a TextLabel named TextLabel

-- Initially, we don't want to show the dialogue
textLabel.Visible = false

-- Function to show the dialogue
local function showDialogue()
    textLabel.Visible = true
    wait(2) -- Wait for 2 seconds
    textLabel.Visible = false
end

-- Function to handle key press
local function onKeyPress(input)
    if input.KeyCode == Enum.KeyCode.Q then
        showDialogue()
    end
end

-- Connect the function to the InputBegan event
game:GetService("UserInputService").InputBegan:Connect(onKeyPress)
```

This script listens for when the player presses the "Q" key. When that happens, it makes the TextLabel visible, effectively showing the dialogue "wawaw" (or whatever text you set the TextLabel to display). After 2 seconds, the dialogue automatically disappears.

Remember to customize the TextLabel to display the text "wawaw" and adjust its properties according to your GUI design preferences.

"Create a lighting system where lighting is added to certain parts after clicking on a button which can also be toggled on or off"

"fly script"

"write a script that rigs a model"

I cannot create a full rigging script for a model as it depends on the specific model and its structure. However, I can provide you with a basic script that demonstrates how to create and connect Motor6D instances to rig a simple model with two parts.

```lua
-- Server Script

-- Assuming you have two parts named "Part1" and "Part2" in your model
local model = game.Workspace.Model
local part1 = model.Part1
local part2 = model.Part2

-- Create a Motor6D instance
local motor = Instance.new("Motor6D")

-- Set the Part0 and Part1 properties to the parts you want to connect
motor.Part0 = part1
motor.Part1 = part2

-- Set the C0 and C1 properties to define the relative positions of the parts
motor.C0 = CFrame.new(0, 1, 0) -- Adjust this value to position part1 correctly
motor.C1 = CFrame.new(0, -1, 0) -- Adjust this value to position part2 correctly

-- Parent the Motor6D to one of the parts
motor.Parent = part1
```

This script creates a Motor6D instance and connects two parts named "Part1" and "Part2" in a model. You can adjust the C0 and C1 properties to position the parts correctly relative to each other. For a more complex model, you would need to create multiple Motor6D instances and connect them accordingly.

"make shift run"

"if the script is in something named box then every time you say box it makes the box bigger. server script. Size is not a valid member of Model "Workspace.box" fix it"

"Create a Roblox Studio script that works. When the player presses the E key, he releases a fireball"

-- LocalScript inside StarterPlayerScripts 
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local mouse = player:GetMouse()

local function fireball()
    local fireball = Instance.new("Part")
    fireball.Shape = "Ball"
    fireball.Size = Vector3.new(2, 2, 2)
    fireball.BrickColor = BrickColor.new("Bright red")
    fireball.Material = "Neon"
    fireball.Position = character.Head.Position
    fireball.Parent = workspace
    fireball.CanCollide = false

local fire = Instance.new("Fire", fireball)
    fire.Heat = 0
    fire.Size = 1

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

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

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

"script where clicking UI makes another UI size tween"

"Create a script that makes you first person and make's you walk in a realistic way"

-- local script 
local player = game.Players.LocalPlayer
local camera = workspace.CurrentCamera
local humanoid = player.Character.Humanoid

camera.CameraType = Enum.CameraType.Scriptable
camera.CFrame = CFrame.new(humanoid.RootPart.Position)

local walkSpeed = 8
local jumpPower = 50
local isJumping = false

humanoid.WalkSpeed = walkSpeed
humanoid.JumpPower = jumpPower

local function animate()
    local moveVector = Vector3.new()
    local moveDirection = camera.CFrame.lookVector

if InputService:IsKeyDown(Enum.KeyCode.W) then
        moveVector = moveVector + moveDirection
    end
    if InputService:IsKeyDown(Enum.KeyCode.A) then
        moveVector = moveVector - camera.CFrame.rightVector
    end
    if InputService:IsKeyDown(Enum.KeyCode.S) then
        moveVector = moveVector - moveDirection
    end
    if InputService:IsKeyDown(Enum.KeyCode.D) then
        moveVector = moveVector + camera.CFrame.rightVector
    end

if moveVector.magnitude > 0 then
        humanoid:Move(moveVector * walkSpeed)
    end

if InputService:IsKeyDown(Enum.KeyCode.Space) and not isJumping then
        isJumping = true
        humanoid:ChangeState(Enum.HumanoidStateType.Jumping)
        wait(0.1)
        humanoid.Jump = true
        wait(0.5)
        isJumping = false
    end
end

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

"create a script that notifies a player that they received a new item in their backpack that will show a small image of the item"

"Make a CFrame car driving system that moves model"

"Create a script that makes you first person and make's you walk in a realistic way"

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

"Make a nice looking GUI that flashes red and covers the whole screen that greets you to a game named "Coloured Cars" that says "Press anything to continue" and closes when you press anything on the keyboard and doesn't re-open when you die."

To create a nice looking GUI that flashes red and covers the whole screen, you can follow these steps:

1. In the Roblox Studio, click on the "StarterGui" in the Explorer.
2. Right-click on "StarterGui" and select "Insert Object" > "ScreenGui".
3. Rename the new ScreenGui to "WelcomeScreen".
4. Right-click on "WelcomeScreen" and select "Insert Object" > "Frame".
5. Rename the new Frame to "RedFlash".
6. Set the Frame's properties: Size to {1, 0}, {1, 0}, Position to {0, 0}, {0, 0}, BackgroundColor3 to {1, 0, 0}, and BackgroundTransparency to 0.5.
7. Right-click on "WelcomeScreen" and select "Insert Object" > "TextLabel".
8. Rename the new TextLabel to "WelcomeText".
9. Set the TextLabel's properties: Size to {1, 0}, {0.2, 0}, Position to {0, 0}, {0.4, 0}, TextScaled to true, TextColor3 to {1, 1, 1}, and Text to "Welcome to Coloured Cars\nPress anything to continue".

Now, we need to create a local script to handle the flashing effect and closing the GUI when a key is pressed:

1. Right-click on "WelcomeScreen" and select "Insert Object" > "LocalScript".
2. Rename the new LocalScript to "WelcomeScript".
3. Replace the default code in the script with the following code:

```lua
local UserInputService = game:GetService("UserInputService")
local WelcomeScreen = script.Parent
local RedFlash = WelcomeScreen.RedFlash
local flashing = true

function flash()
	while flashing do
		RedFlash.BackgroundTransparency = 0.5
		wait(0.5)
		RedFlash.BackgroundTransparency = 1
		wait(0.5)
	end
end

function closeGui(input, gameProcessedEvent)
	if not gameProcessedEvent then
		flashing = false
		WelcomeScreen.Enabled = false
	end
end

spawn(flash)
UserInputService.InputBegan:Connect(closeGui)
```

Now, the GUI should flash red, display the welcome message, and close when any key is pressed. To prevent the GUI from re-opening when the player dies, you can add the following code to the "WelcomeScript":

```lua
local Players = game:GetService("Players")
local player = Players.LocalPlayer

player.CharacterAdded:Connect(function()
	WelcomeScreen.Enabled = false
end)
```

This code listens for the player's character to be added to the game and disables the WelcomeScreen when it happens.

"Roblox HumanoidDescription to the npc and apply it with humanoid:Applydescription () and random free items ,packages, and clothing"

-- server script 
local humanoidDescription = Instance.new("HumanoidDescription")
humanoidDescription.Name = "NPC"
humanoidDescription.Gender = Enum.Gender.Male
humanoidDescription.BodyType = Enum.BodyType.Custom
humanoidDescription.Height = 1.8
humanoidDescription.Head = Instance.new("Head")
humanoidDescription.Head.Name = "Head"
humanoidDescription.Head.MeshId = "rbxassetid://YourMeshIDHere"
humanoidDescription.Head.TextureId = "rbxassetid://YourTextureIDHere"

local npc = game.Workspace.NPC
npc.Humanoid:ApplyDescription(humanoidDescription)

-- Random items
local items = {
	"rbxassetid://YourItemID1Here",
	"rbxassetid://YourItemID2Here",
	"rbxassetid://YourItemID3Here",
	"rbxassetid://YourItemID4Here"
}

local item = items[math.random(#items)]
local itemClone = game:GetService("InsertService"):LoadAsset(item):Clone()
itemClone.Parent = npc

-- Random packages
local packages = {
	"rbxassetid://YourPackageID1Here",
	"rbxassetid://YourPackageID2Here",
	"rbxassetid://YourPackageID3Here"
}

local package = packages[math.random(#packages)]
local packageClone = game:GetService("InsertService"):LoadAsset(package):Clone()
packageClone.Parent = npc

-- Random clothing
local clothing = {
	"rbxassetid://YourClothingID1Here",
	"rbxassetid://YourClothingID2Here",
	"rbxassetid://YourClothingID3Here"
}

local clothing = clothing[math.random(#clothing)]
local clothingClone = game:GetService("InsertService"):LoadAsset(clothing):Clone()
clothingClone.Parent = npc

"Make a part that if a player hits the part it will make them sit for 3 seconds"

"when a player steps on the model, shake the model for 2 seconds and then make the model cancollide false and transparent"

"make a roblox script where when Harlandroblox says !game5 then Parts what are purple will fall out of the sky and if a player does touch them they get kicked and it says OOF! it lasts for 30 seconds and 2 Parts each 0.2 second and the Parts disappear off the floor in 40 seconds the Parts fall above all Players heads Apart from Harlandroblox"

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

local function spawnPart(player)
    local part = Instance.new("Part", Workspace)
    part.BrickColor = BrickColor.new("Royal purple")
    part.Size = Vector3.new(2, 2, 2)
    part.Anchored = false
    part.Position = player.Character.Head.Position + Vector3.new(0, 50, 0)
    part.Touched:Connect(function(hit)
        local hitPlayer = Players:GetPlayerFromCharacter(hit.Parent)
        if hitPlayer and hitPlayer ~= Harlandroblox then
            hitPlayer:Kick("OOF!")
        end
    end)
    game:GetService("Debris"):AddItem(part, 40)
end

local function game5(player)
    for i = 1, 30 * 5 do
        for _, player in ipairs(Players:GetPlayers()) do
            if player.Name ~= Harlandroblox then
                spawnPart(player)
            end
        end
        wait(0.2)
    end
end

Players.PlayerAdded:Connect(function(player)
    player.Chatted:Connect(function(message)
        if player.Name == Harlandroblox and message:lower() == "!game5" then
            game5(player)
        end
    end)
end)

"how to animate my sword movement"

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

"fix this script"

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

"Create cutscene script that goes in startergui that will put the players camera on Cam 1 and Cam 2 in workspace and make the Cam1 and Cam 2 parts spin around the sphere then cut out into a Black screen go back to the Players normal camera do this When a ProximityPrompt in Activate part is used"

```lua
-- local script (StarterGUI) 
local proximityPrompt = game.Workspace.ActivatePart:FindFirstChild("ProximityPrompt")
local cam1 = game.Workspace.Cam1
local cam2 = game.Workspace.Cam2
local sphere = game.Workspace.Sphere -- Assuming there's a Sphere part in the Workspace to rotate around
local player = game.Players.LocalPlayer
local camera = game.Workspace.CurrentCamera
local originalCamType = camera.CameraType
local originalCamFocus = camera.CameraSubject

local function onPromptTriggered()
    camera.CameraType = Enum.CameraType.Scriptable
    local camPositions = {cam1, cam2}
    
    for _, camPart in ipairs(camPositions) do
        camera.CFrame = CFrame.new(camPart.Position, sphere.Position)
        for i = 1, 360, 10 do
            camPart.CFrame = camPart.CFrame * CFrame.Angles(0, math.rad(10), 0)
            camera.CFrame = CFrame.new(camPart.Position, sphere.Position)
            wait(0.1)
        end
    end
    
    -- Fade to black then revert to player's camera
    local screenGui = Instance.new("ScreenGui", player.PlayerGui)
    local blackScreen = Instance.new("Frame", screenGui)
    blackScreen.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
    blackScreen.Size = UDim2.new(1, 0, 1, 0)
    blackScreen.ZIndex = 10 -- Ensuring it's on top of other GUI elements
    
    wait(2) -- Duration of the black screen
    
    -- Remove the black screen and revert camera
    blackScreen:Destroy()
    camera.CameraType = originalCamType
    camera.CameraSubject = originalCamFocus
end

proximityPrompt.Triggered:Connect(onPromptTriggered)
```

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

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

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

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

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

"create a local player script for existing leaderboard value that named ["Cubes Collected"] i want you to create GUI that will show same value as on leaderboard, GUI must be on the top of the screen"

"Please keep the entire current script, please update it so after someone creates a crew it hides the starting Frame and makes another frame visible. I have the GUIs already, I need the 2nd frame to list the Crew Name, The Crew Owner, the Overall Crew Bounty, and the crew members."

-- Local script for the Text button 
local button = script.Parent
local textBox = button.Parent.TextBox
local player = game.Players.LocalPlayer
local dataStore = game:GetService("DataStoreService"):GetDataStore("CrewData")
local crewFrame = button.Parent.Parent.CrewFrame -- assuming the CrewFrame is a sibling of the button's parent
local startFrame = button.Parent.Parent.StartFrame -- assuming the StartFrame is a sibling of the button's parent

local function saveCrewName()
    local crewName = textBox.Text
    if crewName ~= "" then
        dataStore:SetAsync(tostring(player.UserId), crewName)
        print("Crew name saved!")
        -- Hide the start frame and show the crew frame
        startFrame.Visible = false
        crewFrame.Visible = true
        -- Set the crew name, crew owner, overall crew bounty, and crew members in the crew frame
        crewFrame.CrewName.Text = crewName
        crewFrame.CrewOwner.Text = player.Name
        -- Assuming the crew bounty and crew members are stored in the data store
        crewFrame.CrewBounty.Text = dataStore:GetAsync(crewName.."_bounty") or "0"
        crewFrame.CrewMembers.Text = table.concat(dataStore:GetAsync(crewName.."_members") or {}, ", ")
    else
        print("Please enter a valid crew name.")
    end
end

button.MouseButton1Click:Connect(saveCrewName)

-- Server script for loading the data when player joins 
game.Players.PlayerAdded:Connect(function(player)
    local dataStore = game:GetService("DataStoreService"):GetDataStore("CrewData")
    local crewName = dataStore:GetAsync(tostring(player.UserId))
    if crewName then
        print("Loaded crew name: "..crewName)
    else
        print("No saved crew name found.")
    end
end)

-- Server script for saving the data when player leaves 
game.Players.PlayerRemoving:Connect(function(player)
    local dataStore = game:GetService("DataStoreService"):GetDataStore("CrewData")
    local crewName = dataStore:GetAsync(tostring(player.UserId))
    if crewName then
        dataStore:SetAsync(tostring(player.UserId), crewName)
        print("Saved crew name: "..crewName)
    else
        print("No crew name to save.")
    end
end)

"Make a punch tool"

"at the top of your screen there is a gui saying super speed and when you click it it will promp you to buy my developer product if they do it will give them 50 walkspeed"

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

"make a join message in chat that is yellow"

"make a fire effect"

"make a part"

"create a sword combat system"

"create a level system with xp with data store that changes players health and players weapon damage will increase as player levels up"

-- main script (ServerScriptService) 
local DataStoreService = game:GetService("DataStoreService")
local levelDataStore = DataStoreService:GetDataStore("LevelData")
local xpDataStore = DataStoreService:GetDataStore("XPData")

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

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

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

local data
    local success, err = pcall(function()
        data = levelDataStore:GetAsync(player.UserId .. "-Level")
    end)

if success and data then
        level.Value = data
    end

success, err = pcall(function()
        data = xpDataStore:GetAsync(player.UserId .. "-XP")
    end)

if success and data then
        xp.Value = data
    end
end

local function onPlayerRemoving(player)
    local success, err = pcall(function()
        levelDataStore:SetAsync(player.UserId .. "-Level", player.leaderstats.Level.Value)
    end)

success, err = pcall(function()
        xpDataStore:SetAsync(player.UserId .. "-XP", player.leaderstats.XP.Value)
    end)
end

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

-- script for increasing player health and weapon damage (ServerScriptService) 
local function updateStats(player)
    local level = player.leaderstats.Level.Value
    player.Character.Humanoid.MaxHealth = 100 + (level * 10)
    player.Character.Humanoid.Health = player.Character.Humanoid.MaxHealth

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

game.Players.PlayerAdded:Connect(function(player)
    player.leaderstats.Level.Changed:Connect(function()
        updateStats(player)
    end)
end)

-- script for adding XP (ServerScriptService) 
local function addXP(player, amount)
    local xp = player.leaderstats.XP
    local level = player.leaderstats.Level
    xp.Value = xp.Value + amount

if xp.Value >= level.Value * 100 then
        xp.Value = xp.Value - level.Value * 100
        level.Value = level.Value + 1
    end
end

game.ReplicatedStorage.RemoteEvent.OnServerEvent:Connect(function(player, amount)
    addXP(player, amount)
end)

"create a buffs system when the player presses c ingame give them 15% plus Hp 10% plus speed to their humanoid stats and make it last 1 MInute then remove the buffs and add a 3 Minute cd"

```lua
-- local script to be placed in StarterPlayerScripts 
local UserInputService = game:GetService("UserInputService")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local cooldown = false

local function applyBuffs()
    if cooldown then
        return
    end
    cooldown = true
    local character = player.Character or player.CharacterAdded:Wait()
    local humanoid = character:FindFirstChildOfClass("Humanoid")
    
    if humanoid then
        -- Apply buffs
        humanoid.MaxHealth = humanoid.MaxHealth * 1.15
        humanoid.Health = humanoid.Health * 1.15
        humanoid.WalkSpeed = humanoid.WalkSpeed * 1.10
        
        wait(60) -- Buff duration
        
        -- Remove buffs
        humanoid.MaxHealth = humanoid.MaxHealth / 1.15
        humanoid.Health = humanoid.Health / 1.15
        humanoid.WalkSpeed = humanoid.WalkSpeed / 1.10
    end
    
    wait(180) -- Cooldown duration
    cooldown = false
end

UserInputService.InputBegan:Connect(function(input, gameProcessedEvent)
    if gameProcessedEvent then return end
    if input.KeyCode == Enum.KeyCode.C then
        applyBuffs()
    end
end)
```

"make a script that makes a part constantly spin in circle"

"Make me a script that spawns in coins that the player can collect alongside with a leader stats script with text inside to show me how to set it up"

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

local coins = Instance.new("IntValue")
    coins.Name = "Coins"
    coins.Value = 0
    coins.Parent = leaderstats

local bag = Instance.new("IntValue")
    bag.Name = "Bag"
    bag.Value = 0
    bag.Parent = leaderstats
end)

-- coin spawner script (ServerScriptService) 
while true do
    local coin = Instance.new("Part")
    coin.Name = "Coin"
    coin.Shape = "Cylinder"
    coin.Size = Vector3.new(2, 1, 2)
    coin.BrickColor = BrickColor.new("Bright yellow")
    coin.Parent = game.Workspace
    coin.Position = Vector3.new(math.random(-100, 100), 5, math.random(-100, 100))
    coin.Anchored = true
    coin.CanCollide = true

local coinScript = Instance.new("Script")
    coinScript.Parent = coin
    coinScript.Source = [[
local part = script.Parent
local addPoint = true

local function collect(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player and addPoint then
        local playerBag = player.leaderstats.Bag.Value
        if playerBag < 3 then
            addPoint = false
            player.leaderstats.Bag.Value = player.leaderstats.Bag.Value + 1
            part:Destroy()
        end
    end
end
part.Touched:Connect(collect)
]]

wait(5)
end

-- Instructions 
--
1. Create a new script in ServerScriptService and name it "leaderstats" and paste the leaderstats script.
2. Create another script in ServerScriptService and name it "coinSpawner" and paste the coin spawner script.
3. Run the game, and the coins will spawn and can be collected by the player.
4. The player's stats will be displayed in the leaderstats folder under the player in the Players service.

"write me a roblox script that gives a player named "NotCowWater" a tool stored in ServerStorage called "Key2" on joining and tell me where to put the script"

"Give me a realistic smooth motion blur script that applies blur when the player rotates their camera in first person. It doesn't apply on movement, only camera rotation"

"make a script for a port. In this script I want a door called "Door Back" to teleport to a door called "Door Bathroom" when I press "E" at the proximity prompt, with a timer of 0.5 seconds."

"give an example of the use of a moduale script for a speed simulator"

"improve this script and tell me how u did improve it and also unknown global b and t"

The script is controlling the state of two lights based on the time of day. The lights are turned on and off at specific times. However, the script could be improved in several ways:

1. Use descriptive variable names: Instead of using single letter variable names like 'b', 't', 'l', 'oh', 'om', 'ch', 'cm', 'ot', and 'ct', use descriptive names that explain what the variables represent. This makes the script easier to understand and maintain.

2. Handle nil values: The script assumes that the SpotLight and Light exist. It would be better to handle the case where they do not exist.

3. Use constants for magic numbers: The numbers 7, 30, 17, and 30 are used without explanation. It would be better to define these as constants at the top of the script, with names that explain what they represent.

4. Remove unnecessary if statements: The script checks if 'om' and 'cm' are nil, but these are hard-coded values and will never be nil.

Here's how the script could look after these improvements:

```lua
-- Constants
local OPEN_HOUR = 7
local OPEN_MINUTE = 30
local CLOSE_HOUR = 17
local CLOSE_MINUTE = 30

-- Ensure the necessary parts exist
assert(script.Parent:FindFirstChild("SpotLight"), "SpotLight not found")
assert(script.Parent:FindFirstChild("Light"), "Light not found")

local spotLight = script.Parent.SpotLight
local light = script.Parent.Light

local lightingService = game:GetService("Lighting")

-- Convert hours and minutes to minutes past midnight
local openTime = (OPEN_HOUR + (OPEN_MINUTE / 60)) * 60
local closeTime = (CLOSE_HOUR + (CLOSE_MINUTE / 60)) * 60

local function TimeChanged()
    local currentTime = lightingService:GetMinutesAfterMidnight()

if (currentTime >= openTime and currentTime <= closeTime) or
       (currentTime >= openTime or currentTime <= closeTime) then
        spotLight.Enabled = false
        light.Enabled = false
    else
        spotLight.Enabled = true
        light.Enabled = true
    end
end

TimeChanged()

lightingService.Changed:Connect(function(property)
    if property == "TimeOfDay" then
        TimeChanged()
    end
end)
```

In this improved version, the script is more readable and robust. It handles the case where the necessary parts do not exist, uses descriptive variable names, and removes unnecessary checks for nil values. It also uses constants for magic numbers, making the script easier to understand and modify.

"Can you make physics based animation system for R15 players using constraints and CFrames to animate arms and legs to move realistically?"

Creating a physics-based animation system for R15 players using constraints and CFrames is a complex task and would require a deep understanding of Roblox constraints, CFrames, and character rigging. However, I can provide you with a basic example of how to use Motor6D and CFrame to animate a character's arm.

This script should be placed in a LocalScript inside the StarterPlayerScripts folder.

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

local function animateCharacter(character)
    local humanoid = character:WaitForChild("Humanoid")
    local leftArm = character:WaitForChild("Left Arm")
    local rightArm = character:WaitForChild("Right Arm")
    local leftShoulder = character:WaitForChild("Left Shoulder")
    local rightShoulder = character:WaitForChild("Right Shoulder")

local leftShoulderC0 = leftShoulder.C0
    local rightShoulderC0 = rightShoulder.C0

while true do
        -- Animate left arm
        leftShoulder.C0 = leftShoulderC0 * CFrame.Angles(0, 0, math.rad(30))
        rightShoulder.C0 = rightShoulderC0 * CFrame.Angles(0, 0, math.rad(-30))
        wait(0.5)

-- Reset left arm
        leftShoulder.C0 = leftShoulderC0
        rightShoulder.C0 = rightShoulderC0
        wait(0.5)
    end
end

local function onCharacterAdded(character)
    animateCharacter(character)
end

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

Players.PlayerAdded:Connect(onPlayerAdded)
for _, player in ipairs(Players:GetPlayers()) do
    onPlayerAdded(player)
end
```

This script will animate the character's arms to move back and forth. You can expand on this concept to create a more realistic animation system using additional constraints and CFrames for other body parts.

Keep in mind that this is just a starting point, and creating a full physics-based animation system will require a lot of experimentation and fine-tuning.

"make a script after 10 seconds, the models Zombie, Zombie 2, Zombie 3, Zombie 4 gets deleted."

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

"15:46:01.730 Head is not a valid member of Model "Workspace.qw3rty_l0l" - Client - Oxygen:4"

-- It seems like the script is trying to access the 'Head' part of the character model which does not exist or is not named as 'Head'. 
You can use the FindFirstChild method to ensure the 'Head' part exists before accessing it.

local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:FindFirstChildWhichIsA("Humanoid")
local head = character:FindFirstChild("Head") -- use FindFirstChild to ensure 'Head' exists
if not head then
    return -- if 'Head' does not exist, stop executing the script
end
local oxygenBar1 = player.PlayerGui:WaitForChild("Oxygen")
local oxygenBar = oxygenBar1:WaitForChild("Bar")
local healthDecreaseRate = 10
local oxygenDecreaseRate = 1
local oxygenIncreaseRate = 2
local isHeadInWater = false

while task.wait() do
	local headPos = head.Position
	local partsInRegion = workspace:FindPartsInRegion3(Region3.new(headPos - Vector3.new(1,1,1), headPos   Vector3.new(1,1,1)), nil, math.huge)
	for i, part in ipairs(partsInRegion) do
		if part.Name == "Water" then
			isHeadInWater = true
			break
		else
			isHeadInWater = false
		end
	end

if isHeadInWater then
		if oxygenBar.Size.X.Scale > 0 then
			oxygenBar.Size = UDim2.new(oxygenBar.Size.X.Scale - oxygenDecreaseRate, 0, 1, 0)
		else
			if humanoid.Health > 0 then
				humanoid.Health = humanoid.Health - healthDecreaseRate
			end
		end
	else
		if oxygenBar.Size.X.Scale < 1 then
			oxygenBar.Size = UDim2.new(oxygenBar.Size.X.Scale   oxygenIncreaseRate, 0, 1, 0)
		end
	end
end

"change the death sound of the game to oof"

"make a dumbell script that lets you lift weights assuming you already have the tool and dumbell and with instructions on where to place it"

-- local tool script (ReplicatedStorage -> Tools -> Dumbell) 
local tool = script.Parent
local debounce = false
local liftStrength = 10 -- Change this value to adjust the strength gained per lift

tool.Activated:Connect(function()
    if debounce then return end
    debounce = true
    
    local character = tool.Parent
    local humanoid = character:FindFirstChildOfClass("Humanoid")
    
    if humanoid then
        -- Play lifting animation if you have one
        -- local animation = Instance.new("Animation")
        -- animation.AnimationId = "rbxassetid://YOUR_ANIMATION_ID"
        -- local animator = humanoid:FindFirstChildWhichIsA("Animator") or humanoid:WaitForChild("Animator")
        -- local animationTrack = animator:LoadAnimation(animation)
        -- animationTrack:Play()
        
        -- Increase the player's strength here
        local leaderstats = character:FindFirstChild("leaderstats")
        local strength = leaderstats and leaderstats:FindFirstChild("Strength")
        if strength then
            strength.Value = strength.Value + liftStrength
        end
        
        -- Wait for a bit before allowing the player to lift again
        wait(1)
        debounce = false
    end
end)

-- Instructions:
1. Place this script inside a Tool object that represents the dumbbell.
2. Ensure the Tool object is inside the ReplicatedStorage under a folder named "Tools".
3. If you have a lifting animation, replace 'YOUR_ANIMATION_ID' with the actual ID of your animation.
4. Make sure the player's character has a leaderstats object with a "Strength" value for this to work.

"make a shift to spring with little bar on the bottom of the screen for cooldown, make it so the sprint is on cooldown, and is hold, not toggle."

```lua
-- local script (StarterGUI) 
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local screenGui = Instance.new("ScreenGui", player.PlayerGui)

local sprintBar = Instance.new("Frame", screenGui)
sprintBar.BackgroundColor3 = Color3.fromRGB(0, 255, 0)
sprintBar.AnchorPoint = Vector2.new(0.5, 1)
sprintBar.Position = UDim2.new(0.5, 0, 1, -10)
sprintBar.Size = UDim2.new(0.3, 0, 0.02, 0)

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

local sprintCooldown = 5
local sprintDuration = 2
local sprintSpeed = 2 * humanoid.WalkSpeed
local normalSpeed = humanoid.WalkSpeed
local isSprinting = false
local canSprint = true

local function updateSprintBarFill()
    sprintBarFill.Size = UDim2.new(canSprint and 1 or 0, 0, 1, 0)
end

local function startSprint()
    if canSprint then
        isSprinting = true
        humanoid.WalkSpeed = sprintSpeed

canSprint = false
        updateSprintBarFill()

wait(sprintDuration)

isSprinting = false
        humanoid.WalkSpeed = normalSpeed

wait(sprintCooldown)

canSprint = true
        updateSprintBarFill()
    end
end

local function onInputBegan(input, gameProcessed)
    if input.KeyCode == Enum.KeyCode.LeftShift and not gameProcessed then
        if not isSprinting then
            startSprint()
        end
    end
end

player:GetMouse().KeyDown:Connect(onInputBegan)
```
This script creates a sprint bar at the bottom of the screen, and allows the player to sprint by holding the left shift key. The sprint has a cooldown and duration, and the player's speed increases while sprinting.

"npc that follows closest player walk animation"

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

local function findClosestPlayer()
    local closestPlayer = nil
    local closestDistance = math.huge

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

return closestPlayer
end

while true do
    local closestPlayer = findClosestPlayer()
    if closestPlayer and closestPlayer.Character then
        local path = pfs:CreatePath()
        path:ComputeAsync(npc.HumanoidRootPart.Position, closestPlayer.Character.HumanoidRootPart.Position)

local waypoints = path:GetWaypoints()
        local humanoid = npc.Humanoid
        local walkAnimTrack = humanoid:LoadAnimation(walkAnimation)

for _, waypoint in ipairs(waypoints) do
            humanoid:MoveTo(waypoint.Position)
            walkAnimTrack:Play()
            humanoid.MoveToFinished:Wait()
        end
    end
    wait(1)
end

"When a player says "/e (text of my choice)", then it will play an animation inside the script."

"create a realistic soccer ball script where if you press "q" it shoots the ball"

-- local script 
local ball = script.Parent
local player = game.Players.LocalPlayer

local function onKeyPress(actionName, userInputState, inputObject)
    if userInputState == Enum.UserInputState.Begin and actionName == "Shoot" then
        local force = (inputObject.Hit.p - ball.Position).unit * 500
        ball:SetNetworkOwner(player)
        ball:SetNetworkOwnerScript(script)
        ball:SetNetworkPosition(ball.Position, true)
        ball:SetVelocity(force)
    end
end

player.Character.Humanoid.Changed:Connect(function()
    player.Character.Humanoid.JumpPower = 0
    player.Character.Humanoid.WalkSpeed = 0
    player.Character.Humanoid.HipHeight = 0
    player.Character.Humanoid.AutoRotate = false
    player.Character.Humanoid.AutoRotateOffset = 0
end)

player.Character.Humanoid.Died:Connect(function()
    ball:SetNetworkOwner(nil)
    ball:SetNetworkOwnerScript(nil)
    ball:SetNetworkPosition(ball.Position, true)
    ball:SetVelocity(Vector3.new(0, 0, 0))
end)

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

"Can you write a script that makes the player's head turn in the direction of the camera and simulates real human head physics?"

I can provide you with a script that makes the player's head turn in the direction of the camera. However, simulating real human head physics is quite complex and may require a more advanced implementation.

Here's a script that makes the player's head turn in the direction of the camera:

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

local player = Players.LocalPlayer
local camera = workspace.CurrentCamera

function updateHeadRotation()
    local character = player.Character
    if character and character:FindFirstChild("Head") and character:FindFirstChild("Humanoid") then
        local head = character.Head
        local humanoid = character.Humanoid
        local rootPart = character.HumanoidRootPart

if humanoid.Health > 0 then
            local lookVector = camera.CFrame.lookVector
            local rootPartLookVector = rootPart.CFrame:VectorToObjectSpace(lookVector)
            local angle = math.atan2(rootPartLookVector.X, rootPartLookVector.Z)
            local headRotation = CFrame.Angles(0, angle, 0)

head.CFrame = rootPart.CFrame * headRotation * CFrame.new(0, head.Size.Y / 2, 0)
        end
    end
end

RunService.RenderStepped:Connect(updateHeadRotation)
```

This script will make the player's head turn in the direction of the camera, but it does not simulate real human head physics. Implementing realistic head physics would require a more advanced understanding of Roblox physics, constraints, and animations.

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

"left click"

"make the part the script is inside of make a light flicker randomly and make the light sync with the part"

"Make a script where while a players mouse hovers over a certain TextButton, it shows a brief description next to the players mouse until they move their mouse off the TextButton. On the bottom of this script put in comments where I will put this script."

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

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

"script for 4 different sets of teleporters in a folder called "Teleports" with the option to make them one-way. add detailed comments, explanation and instructions."

-- Folder structure:
- Workspace
    - Teleports
        - TeleporterSet1
            - Teleporter1
            - Teleporter2
        - TeleporterSet2
            - Teleporter1
            - Teleporter2
        - TeleporterSet3
            - Teleporter1
            - Teleporter2
        - TeleporterSet4
            - Teleporter1
            - Teleporter2

-- server script (ServerScriptService) 
local teleportsFolder = game.Workspace.Teleports
local debounce = true -- Prevents multiple teleportations at once
local oneWay = false -- Set to true for one-way teleporters

local function teleportPlayer(player, destination)
    player.Character.HumanoidRootPart.CFrame = destination.CFrame * CFrame.new(0, 3, 0) -- Teleports the player to the destination and adds an offset to prevent getting stuck
    wait(1)
    debounce = true
end

local function onTouched(part, teleporterSet)
    local player = game.Players:GetPlayerFromCharacter(part.Parent)
    if player and debounce then
        debounce = false
        local teleporter1 = teleporterSet.Teleporter1
        local teleporter2 = teleporterSet.Teleporter2
        if part.Parent:FindFirstChild("HumanoidRootPart") then
            if part == teleporter1 then
                teleportPlayer(player, teleporter2)
                if oneWay then debounce = true end
            elseif part == teleporter2 and not oneWay then
                teleportPlayer(player, teleporter1)
            end
        end
    end
end

for _, teleporterSet in ipairs(teleportsFolder:GetChildren()) do
    local teleporter1 = teleporterSet.Teleporter1
    local teleporter2 = teleporterSet.Teleporter2
    teleporter1.Touched:Connect(function(part) onTouched(part, teleporterSet) end)
    teleporter2.Touched:Connect(function(part) onTouched(part, teleporterSet) end)
end

-- 
Instructions:
1. Create a folder in Workspace called "Teleports".
2. Inside the "Teleports" folder, create 4 folders named "TeleporterSet1", "TeleporterSet2", "TeleporterSet3", and "TeleporterSet4".
3. Inside each TeleporterSet folder, create two parts named "Teleporter1" and "Teleporter2".
4. Customize the parts as desired (e.g., size, shape, color).
5. Place this script in ServerScriptService.
6. Set the "oneWay" variable to true if you want one-way teleporters, or false for two-way teleporters.

Explanation:
This script sets up 4 sets of teleporters inside a folder called "Teleports" in the Workspace. Each set contains two teleporters, and the script allows players to teleport between them. The script has an option to make the teleporters one-way or two-way. When a player touches a teleporter, they will be teleported to the corresponding teleporter in the set. The script uses a debounce to prevent multiple teleportations at once.

"create a zombie NPC that follows players, attack players and do damage, and has pathfinding and obstacle avoidance"

-- server script 
local PathfindingService = game:GetService("PathfindingService")
local Players = game:GetService("Players")
local Zombie = game.Workspace.Zombie
local attackRange = 5
local damage = 10
local attackCooldown = 2

function findNearestPlayer(zombiePosition)
    local nearestPlayer = nil
    local minDistance = math.huge
    for _, player in ipairs(Players:GetPlayers()) do
        if player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
            local distance = (player.Character.HumanoidRootPart.Position - zombiePosition).Magnitude
            if distance < minDistance then
                minDistance = distance
                nearestPlayer = player
            end
        end
    end
    return nearestPlayer
end

function followAndAttackPlayer(zombie, player)
    local path = PathfindingService:CreatePath()
    local humanoid = zombie:WaitForChild("Humanoid")
    local rootPart = zombie:WaitForChild("HumanoidRootPart")
    local canAttack = true
    
    local function attack()
        if canAttack then
            canAttack = false
            local character = player.Character
            if character and character:FindFirstChild("Humanoid") then
                character.Humanoid:TakeDamage(damage)
            end
            wait(attackCooldown)
            canAttack = true
        end
    end

while true do
        if player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
            path:ComputeAsync(rootPart.Position, player.Character.HumanoidRootPart.Position)
            local waypoints = path:GetWaypoints()
            for _, waypoint in ipairs(waypoints) do
                humanoid:MoveTo(waypoint.Position)
                humanoid.MoveToFinished:Wait()
                if (rootPart.Position - player.Character.HumanoidRootPart.Position).Magnitude <= attackRange then
                    attack()
                end
            end
        end
        wait()
    end
end

while true do
    local nearestPlayer = findNearestPlayer(Zombie.HumanoidRootPart.Position)
    if nearestPlayer then
        followAndAttackPlayer(Zombie, nearestPlayer)
    end
    wait()
end

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

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

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

proximityPrompt.Triggered:Connect(onPromptActivated)

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

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

UserInputService.InputBegan:Connect(onInputBegan)

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

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

"click the ui button to buy a developer product. buying the product flings all players"

"can you make it so that people only have access to the Admin GUI if they are in the group minimum rank or have there name inside of PlayerNames"

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

"loading screen system for a screen gui Named LoadingGui inside theres a frame called progress bar make it so the Textlabel inside the frame called Loader will say Loading and the Number its at till 100 make it so the label gets bigger till its done"

"cREATE A SERVER SCRIPT so that whenever a player says *Kill (username) it spams errors in that players console EVERY 0.1 SEC"

"can you make a script that will if i touch part A it will teleport me to part B then if i touch part B again it will teleport me to part A"

"can you make a script that will kick the player who types the "!kick" command in chat"

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

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

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

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

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

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

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

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

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

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

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

part.Touched:Connect(onTouched)

"npc that follows you"

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

while true do
    local players = game:GetService("Players"):GetPlayers()
    local closestPlayer = nil
    local closestDistance = math.huge

for _, player in ipairs(players) do
        local character = player.Character
        if character then
            local distance = (npc.HumanoidRootPart.Position - character.HumanoidRootPart.Position).magnitude
            if distance < closestDistance then
                closestPlayer = character
                closestDistance = distance
            end
        end
    end

if closestPlayer and closestDistance > followDistance then
        local path = PathfindingService:CreatePath()
        path:ComputeAsync(npc.HumanoidRootPart.Position, closestPlayer.HumanoidRootPart.Position)

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

wait(1)
end

"create a script where if a player says "Hi" in the chat they get killed"

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

-- Server Script

-- Create a global table to store the votes
local votes = {}

-- Create a function to start the vote
function startVote(playerToKick)
	-- Set up the GUI
	local frame = game.StarterGui.VoteKickGui.Frame
	frame.YesButton.Text = "Yes"
	frame.NoButton.Text = "No"
	frame.TextLabel.Text = "Do you want to kick "..playerToKick.Name.."?"
	
	-- Start the vote
	for _, player in pairs(game.Players:GetPlayers()) do
		votes[player] = false
		frame.Visible = true
	end
	
	-- Connect the buttons to the voting functions
	frame.YesButton.MouseButton1Click:Connect(function()
		voteYes(playerToKick)
	end)
	frame.NoButton.MouseButton1Click:Connect(function()
		voteNo(playerToKick)
	end)
	
	-- Start a timer to end the vote after 5 seconds
	delay(5, function()
		endVote(playerToKick)
	end)
end

-- Create a function to vote yes
function voteYes(playerToKick)
	local player = game.Players.LocalPlayer
	votes[player] = true
	checkVotes(playerToKick)
end

-- Create a function to vote no
function voteNo(playerToKick)
	local player = game.Players.LocalPlayer
	votes[player] = false
	checkVotes(playerToKick)
end

-- Create a function to check if all the players have voted
function checkVotes(playerToKick)
	local allVoted = true
	for _, vote in pairs(votes) do
		if vote == false then
			allVoted = false
		end
	end
	
	if allVoted then
		endVote(playerToKick)
	end
end

-- Create a function to end the vote
function endVote(playerToKick)
	local frame = game.StarterGui.VoteKickGui.Frame
	frame.Visible = false
	
	-- Count the votes
	local yesVotes = 0
	local noVotes = 0
	for _, vote in pairs(votes) do
		if vote == true then
			yesVotes = yesVotes + 1
		else
			noVotes = noVotes + 1
		end
	end
	
	-- Kick the player if they have more yes votes than no votes
	if yesVotes > noVotes then
		playerToKick:Kick()
	end
end

"make a money system with data store"

"make the model shake, fall, disappear and reset, 2 seconds after the player stands on it. add detailed comments, explanation and instructions."

-- server script 
local model = script.Parent -- reference to the model
local debounce = true -- to prevent multiple triggers

local function shakeModel()
    for i = 1, 20 do -- repeat the shake 20 times
        model:SetPrimaryPartCFrame(model.PrimaryPart.CFrame * CFrame.Angles(0, 0, math.rad(5))) -- rotate the model 5 degrees
        wait(0.05) -- wait for 0.05 seconds
        model:SetPrimaryPartCFrame(model.PrimaryPart.CFrame * CFrame.Angles(0, 0, math.rad(-10))) -- rotate the model -10 degrees
        wait(0.05) -- wait for 0.05 seconds
        model:SetPrimaryPartCFrame(model.PrimaryPart.CFrame * CFrame.Angles(0, 0, math.rad(5))) -- rotate the model 5 degrees
    end
end

local function onTouch(hit)
    if debounce then -- check if debounce is true
        debounce = false -- set debounce to false to prevent multiple triggers
        local character = hit.Parent
        local humanoid = character:FindFirstChildWhichIsA("Humanoid")

if humanoid then -- check if a player touched the model
            shakeModel() -- call the shakeModel function to shake the model
            wait(2) -- wait for 2 seconds
            model:BreakJoints() -- break the joints to make the model fall
            wait(2) -- wait for 2 seconds
            model:Destroy() -- destroy the model
            wait(2) -- wait for 2 seconds
            game:GetService("Debris"):AddItem(model, 0) -- remove the model from workspace
            debounce = true -- reset debounce to true
        end
    end
end

model.PrimaryPart.Touched:Connect(onTouch) -- connect the onTouch function to the Touched event of the model's PrimaryPart

-- Instructions:
1. Create a model in the workspace with a PrimaryPart set.
2. Add this script as a child of the model.
3. When a player stands on the model, it will shake, fall, disappear, and reset with the specified delays.

"make a roblox script for a leader stat called Robux when a player gets kill kill it goes up by 1 when a player dies it goes down by 1"

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

function onCharacterAdded(character)
	local leaderstats = Instance.new("Folder", character)
	leaderstats.Name = "leaderstats"
	
	local Robux = Instance.new("IntValue", leaderstats)
	Robux.Name = "Robux"
	
	character.Humanoid.Died:Connect(function()
		Robux.Value = Robux.Value - 1
	end)
end

function onPlayerAdded(player)
	player.CharacterAdded:Connect(onCharacterAdded)
	player.CharacterRemoving:Connect(function()
		player.CharacterAdded:Wait():Connect(onCharacterAdded)
	end)
end

function onPlayerRemoving(player)
	local character = player.Character
	if character then
		local leaderstats = character:FindFirstChild("leaderstats")
		if leaderstats then
			local Robux = leaderstats:FindFirstChild("Robux")
			if Robux then
				Robux.Value = Robux.Value - 1
			end
		end
	end
end

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

function onPlayerKill(killer, killed)
	local leaderstats = killer.Character:FindFirstChild("leaderstats")
	if leaderstats then
		local Robux = leaderstats:FindFirstChild("Robux")
		if Robux then
			Robux.Value = Robux.Value + 1
		end
	end
end

game.Workspace.Events.PlayerKill.OnServerEvent:Connect(onPlayerKill)

-- Make sure to create a RemoteEvent called "PlayerKill" in Workspace.Events
-- Call this event from your kill script like this:
-- game.Workspace.Events.PlayerKill:FireServer(killer, killed)

"when ever a player click's a TextButton Named "FlashLightButton" a Sound plays Sound id "226892749" and when the player click's the textbutton again a sound plays again, Sound id "7433801607""

"Make a script so that whenever a player says a color, the part changes the color to whatever the player says. If the color doesn't exist, send a core notification saying that; that color doesn't exist."

"make a snow footprint when u walk on snow (the parent of script) it leaves my footprint model i made right under the feet of the player on the snow when walking on the snow its inside replicatedstorage in the folder Footprints its called Snow"

"make me advanced admin chat commands with at least 5 admin commands! make sure it also has a "/" prefix"

-- server script 
local admins = {"YourUsername1", "YourUsername2"} -- Add your admin usernames here
local prefix = "/"

local function isAdmin(playerName)
    for _, admin in ipairs(admins) do
        if playerName == admin then
            return true
        end
    end
    return false
end

local function onChatted(player, message)
    if isAdmin(player.Name) and string.sub(message, 1, 1) == prefix then
        local command = string.sub(message, 2)
        local args = string.split(command, " ")

if args[1] == "kick" and args[2] then
            local target = game.Players:FindFirstChild(args[2])
            if target then
                target:Kick("Kicked by admin")
            end
        elseif args[1] == "ban" and args[2] then
            local target = game.Players:FindFirstChild(args[2])
            if target then
                table.insert(admins, target.Name)
                target:Kick("Banned by admin")
            end
        elseif args[1] == "unban" and args[2] then
            for i, admin in ipairs(admins) do
                if admin == args[2] then
                    table.remove(admins, i)
                    break
                end
            end
        elseif args[1] == "teleport" and args[2] and args[3] then
            local target1 = game.Players:FindFirstChild(args[2])
            local target2 = game.Players:FindFirstChild(args[3])
            if target1 and target2 and target1.Character and target2.Character then
                target1.Character.HumanoidRootPart.CFrame = target2.Character.HumanoidRootPart.CFrame
            end
        elseif args[1] == "shutdown" then
            for _, player in ipairs(game.Players:GetPlayers()) do
                player:Kick("Server shutdown by admin")
            end
        end
    end
end

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

"create a script that changes a players animation when player is running"

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