Haddock - Roblox Library

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

"create a local script inside a text button that enables and disables default roblox backpack"

"create a script where there are leaderstats called Money and it will save when you leave and rejoin the game"

-- local script (StarterPlayerScripts) 
local DataStoreService = game:GetService("DataStoreService")
local MoneyStore = DataStoreService:GetDataStore("MoneyData")
local Players = game:GetService("Players")

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

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

local savedData
    local success, err = pcall(function()
        savedData = MoneyStore:GetAsync(player.UserId)
    end)

if success and savedData then
        Money.Value = savedData
    else
        Money.Value = 0
    end
end

local function onPlayerRemoving(player)
    local success, err = pcall(function()
        MoneyStore:SetAsync(player.UserId, player.leaderstats.Money.Value)
    end)

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

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

"award a badge when the player's Stage value is 26 award a different badge when the player's Stage value is 51. award a different badge when the player's Rebirths value is 1. award a different badge when the player's Rebirths value is 5."

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

local stage26BadgeId = 0 -- Replace with your badge ID
local stage51BadgeId = 0 -- Replace with your badge ID
local rebirth1BadgeId = 0 -- Replace with your badge ID
local rebirth5BadgeId = 0 -- Replace with your badge ID

local function checkAwards(player)
    local stage = player.leaderstats.Stage.Value
    local rebirths = player.leaderstats.Rebirths.Value

if stage == 26 then
        badgeService:AwardBadge(player.UserId, stage26BadgeId)
    elseif stage == 51 then
        badgeService:AwardBadge(player.UserId, stage51BadgeId)
    end

if rebirths == 1 then
        badgeService:AwardBadge(player.UserId, rebirth1BadgeId)
    elseif rebirths == 5 then
        badgeService:AwardBadge(player.UserId, rebirth5BadgeId)
    end
end

local function onPlayerAdded(player)
    player.leaderstats.Stage.Changed:Connect(function()
        checkAwards(player)
    end)

player.leaderstats.Rebirths.Changed:Connect(function()
        checkAwards(player)
    end)
end

players.PlayerAdded:Connect(onPlayerAdded)

"can you create an eco mode script for my roblox vehicle on roblox and the only way the eco mode could be enabled is by clicking a textbutton named "Eco""

"make a script that walks in the direction of the nearest enemy"

"if the script.parent touched play a sound globally, and change a text name in starterGui for all player guis (screengui.frame.textLabel) For the textlabel text add plus a number 1 to it so right now its 0 -, make it 1 -."

"Create gore when killed"

"make a Gui where it will countdown 30 seconds and then it will tp the players to Part1 Part2 Part3 Part4 Part5 Part6 Part7 Part8 Part9 Part10 Part11 Part12 but only 1 player can be tped to each of the parts when all players die the timer restarts and my part called Spinner will spin and keep getting faster each 5 seconds"

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

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

local countdownLabel = Instance.new("TextLabel", countdownFrame)
countdownLabel.Text = "30"
countdownLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
countdownLabel.BackgroundColor3 = Color3.fromRGB(0, 0, 0)

local parts = {
    workspace.Part1,
    workspace.Part2,
    workspace.Part3,
    workspace.Part4,
    workspace.Part5,
    workspace.Part6,
    workspace.Part7,
    workspace.Part8,
    workspace.Part9,
    workspace.Part10,
    workspace.Part11,
    workspace.Part12
}

local spinner = workspace.Spinner
local spinSpeed = 1
local spinIncrement = 0.2

local function teleportPlayers()
    local players = game.Players:GetPlayers()
    for i, player in ipairs(players) do
        if parts[i] then
            player.Character.HumanoidRootPart.CFrame = parts[i].CFrame
        end
    end
end

local function resetCountdown()
    countdownLabel.Text = "30"
end

local function allPlayersDead()
    for _, player in ipairs(game.Players:GetPlayers()) do
        if player.Character and player.Character:FindFirstChild("Humanoid") and player.Character.Humanoid.Health > 0 then
            return false
        end
    end
    return true
end

local function spin()
    spinner.CFrame = spinner.CFrame * CFrame.Angles(0, math.rad(spinSpeed), 0)
end

local function increaseSpinSpeed()
    spinSpeed = spinSpeed + spinIncrement
end

local function startGame()
    while true do
        for i = 30, 0, -1 do
            countdownLabel.Text = tostring(i)
            wait(1)
        end
        teleportPlayers()
        while not allPlayersDead() do
            wait(5)
            increaseSpinSpeed()
            spin()
        end
        resetCountdown()
    end
end

startGame()
```
This script creates a GUI with a countdown timer and teleports players to the specified parts when the timer reaches 0. It also spins the "Spinner" part and increases its speed every 5 seconds. When all players are dead, the timer resets and the process repeats.

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

"script for multiple sets of teleporters with the option to make them one-way. add detailed comments, explanation and instructions."

-- This script creates multiple sets of teleporters with the option to make them one-way.
 * To use this script, follow these steps:
 * 1. Create two parts in the workspace, one for the teleporter entrance and one for the exit.
 * 2. Name the entrance part "TeleporterEntrance" and the exit part "TeleporterExit".
 * 3. Create a BoolValue inside each part named "OneWay" and set its value to true if you want it to be one-way.
 * 4. Duplicate the entrance and exit parts as many times as you want and position them in the desired locations.
 * 5. Make sure the script is placed inside ServerScriptService.

-- Function to teleport the player
local function teleportPlayer(player, destination)
    local character = player.Character
    if character then
        local humanoidRootPart = character:FindFirstChild("HumanoidRootPart")
        if humanoidRootPart then
            humanoidRootPart.CFrame = destination.CFrame + Vector3.new(0, 2, 0)
        end
    end
end

-- Function to handle teleportation
local function onTouched(teleporter, otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player then
        local teleporterExit = teleporter:FindFirstChild("TeleporterExit")
        if teleporterExit then
            teleportPlayer(player, teleporterExit)
            if not teleporter.OneWay.Value then
                teleportPlayer(player, teleporter)
            end
        end
    end
end

-- Connect the function to all teleporter entrance parts
for _, teleporterEntrance in ipairs(workspace:GetChildren()) do
    if teleporterEntrance.Name == "TeleporterEntrance" then
        teleporterEntrance.Touched:Connect(function(otherPart)
            onTouched(teleporterEntrance, otherPart)
        end)
    end
end

"create a script where when you stand on my part called Bank it will start a countdown from 10 seconds above my part called bank when it gets to 0 you get 500 Money but if you go off the Part before the countdown ends the countdown ends"

-- script for Bank part 
local part = script.Parent
local countdown = 10
local countdownActive = false
local playerOnBank = false

local function startCountdown(player)
    if not countdownActive then
        countdownActive = true
        local billboardGui = Instance.new("BillboardGui")
        local textLabel = Instance.new("TextLabel")
        
        billboardGui.Parent = part
        billboardGui.Adornee = part
        billboardGui.Size = UDim2.new(0, 100, 0, 50)
        billboardGui.StudsOffset = Vector3.new(0, 2, 0)
        
        textLabel.Parent = billboardGui
        textLabel.Size = UDim2.new(1, 0, 1, 0)
        textLabel.BackgroundTransparency = 1
        textLabel.TextColor3 = Color3.new(1, 1, 1)
        textLabel.Font = Enum.Font.SourceSansBold
        textLabel.TextScaled = true
        
        for i = countdown, 0, -1 do
            if playerOnBank then
                textLabel.Text = tostring(i)
                wait(1)
            else
                break
            end
        end
        
        if playerOnBank then
            player.leaderstats.Money.Value = player.leaderstats.Money.Value + 500
        end
        
        billboardGui:Destroy()
        countdownActive = false
    end
end

local function onTouched(hit)
    local player = game.Players:GetPlayerFromCharacter(hit.Parent)
    if player then
        playerOnBank = true
        startCountdown(player)
    end
end

local function onEnded(hit)
    local player = game.Players:GetPlayerFromCharacter(hit.Parent)
    if player then
        playerOnBank = false
    end
end

part.Touched:Connect(onTouched)
part.TouchEnded:Connect(onEnded)

"I want an injury animation for a soccer slide tackle, without health being taken off, and only reacts after the humanoid touches another humanoid. (I already have a slide tackling animation and script)"

"make a script that makes my character loop teleport all around a close opposite team player when i press q"

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

local function teleportToOpponent()
    if teleporting then return end
    teleporting = true
    local closestDistance = math.huge
    local closestPlayer = nil
    for i, opponent in pairs(Players:GetPlayers()) do
        if opponent.TeamColor ~= player.TeamColor then
            local distance = (opponent.Character.HumanoidRootPart.Position - character.HumanoidRootPart.Position).magnitude
            if distance < closestDistance then
                closestDistance = distance
                closestPlayer = opponent
            end
        end
    end
    if closestPlayer then
        character.HumanoidRootPart.CFrame = closestPlayer.Character.HumanoidRootPart.CFrame * CFrame.new(0, 0, 5)
    end
    teleporting = false
end

UserInputService.InputBegan:Connect(function(input)
    if input.KeyCode == Enum.KeyCode.Q then
        teleportToOpponent()
    end
end)

"make a script inside a tool called Basic Sword that plays a sound located inside the tool whenever a NPC with a humanoid called Enemy is damaged but only players close enough can hear it"

"make a npc walk around at a editable range while also saying 10 random chats and add some waypoints in a square shape that spawn around the npc also make the script work inside the npc"

-- First, create a part and name it 'MoveToPart', this is where the NPC will move to, server script 
local pfs = game:GetService("PathfindingService")
local dummy = game.Workspace.Dummy 
local part = game.Workspace.MoveToPart

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

local randomChats = {"Hello!", "How are you?", "Nice weather today.", "I'm just walking around.", "Do you play Roblox?", "Nice to meet you.", "What's your favorite game?", "I'm an NPC.", "Have a great day!", "See you around."}

for _, waypoint in pairs(path:GetWaypoints()) do
    dummy.Humanoid:MoveTo(waypoint.Position)
    dummy.Humanoid.MoveToFinished:Wait()
    dummy.HumanoidRootPart.Chat:Chat(randomChats[math.random(#randomChats)], "All")
end

-- To create waypoints that spawn around the NPC, you can use a loop to generate parts at random positions around the NPC. 
local waypoints = {}

for i = 1, 4 do
    local waypoint = Instance.new("Part")
    waypoint.Size = Vector3.new(1, 1, 1)
    waypoint.Position = dummy.HumanoidRootPart.Position + Vector3.new(math.random(-10, 10), 0, math.random(-10, 10))
    waypoint.Parent = game.Workspace
    waypoints[#waypoints + 1] = waypoint
end

-- Now you can make the NPC move to these waypoints. 
for _, waypoint in pairs(waypoints) do
    path:ComputeAsync(dummy.HumanoidRootPart.Position, waypoint.Position)
    for _, waypoint in pairs(path:GetWaypoints()) do
        dummy.Humanoid:MoveTo(waypoint.Position)
        dummy.Humanoid.MoveToFinished:Wait()
        dummy.HumanoidRootPart.Chat:Chat(randomChats[math.random(#randomChats)], "All")
    end
end

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

"create a script inside a tool called mysteryBox that gives players a random tool inside a folder in serverstorage called Common Folder when players right click while holding the tool"

"part with a working suction"

"make a roblox script that activates a remote event called PlayingJazzin replicated storage by clicking F when holding a tool and make another script that prints You did it when remote event PlayingJazz is activated"

"create a script that will spawn in a certain NPC located inside a folder called MOBS in replicatedstorage after 10 second and near a part and will notify players using chat and not kick players and not use the word broadcast."

"explain how to use remote events"

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

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

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

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

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

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

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

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

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

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

ChangeWalkSpeedEvent.OnServerEvent:Connect(onChangeWalkSpeed)
```

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

"17:27:08.365 Door1 is not a valid member of Model "Workspace.Workspace.Door1" - Server - DoorScript:24"

"Make a script that if you run into other players who are not on your team, you both fall to the ground. Add comments to code"

"Create a realistic IGBT VVVF Inverter train sound"

"then make it so the left arm, right arm, left leg and torso, and right leg, and head is cancollide = true, and make it so health regeneration stops"

-- server script 
local humanoid = script.Parent:WaitForChild("Humanoid")

humanoid.BreakJointsOnDeath = false
humanoid.AutoRotate = false
humanoid.Health = 0

local function checkHealth()
	if humanoid.Health < 10 then
		for index,joint in pairs(script.Parent:GetDescendants()) do
			if joint:IsA("Motor6D") then
				local socket = Instance.new("BallSocketConstraint")
				local a1 = Instance.new("Attachment")
				local a2 = Instance.new("Attachment")
				a1.Parent = joint.Part0
				a2.Parent = joint.Part1
				socket.Parent = joint.Parent
				socket.Attachment0 = a1
				socket.Attachment1 = a2
				a1.CFrame = joint.C0
				a2.CFrame = joint.C1
				socket.LimitsEnabled = true
				socket.TwistLimitsEnabled = true
				joint:Destroy()
			end
		end
        
        humanoid.PlatformStand = true
        humanoid:FindFirstChild("Left Arm").CanCollide = true
        humanoid:FindFirstChild("Right Arm").CanCollide = true
        humanoid:FindFirstChild("Left Leg").CanCollide = true
        humanoid:FindFirstChild("Right Leg").CanCollide = true
        humanoid:FindFirstChild("Torso").CanCollide = true
        humanoid:FindFirstChild("Head").CanCollide = true
        humanoid.Health = 0
        humanoid.MaxHealth = 0

local textLabel = Instance.new("TextLabel")
		textLabel.Parent = humanoid.Parent.Head
		textLabel.Text = "You are unconscious, wait for another player to revive you."
		textLabel.Font = Enum.Font.GothamSemibold
		textLabel.TextColor3 = Color3.new(1,1,1)
		textLabel.TextScaled = true
		textLabel.BackgroundTransparency = 1
		textLabel.Size = UDim2.new(1,0,1,0)
		textLabel.Position = UDim2.new(0,0,0,0)
		textLabel.ZIndex = 2
		textLabel.TextStrokeTransparency = 0
		textLabel.TextWrapped = true
	end
end

humanoid.HealthChanged:Connect(checkHealth)

"the "press t to go the first person" script isn't working."

"light up a part"

"make sure it remembers the player even after they leave the server"

-- server script 
local DataStoreService = game:GetService("DataStoreService")
local myDataStore = DataStoreService:GetDataStore("MyDataStore")

local button = script.Parent
local Player = game:GetService('Players')
local words = {["code"] = 50, ["code2"] = 90, ["code3"] = 70}
local hoverSound = script.Parent.Hover
local clickSound = script.Parent.Click
local successsound = script.Parent.Success
local errorsound = script.Parent.Error
local textbox = script.Parent.Parent.RedeemTextBox

local redeemedCodes = {}

button.MouseButton1Click:Connect(function()
	local player = Player.LocalPlayer
	local textboxText = textbox.Text
	local found = false
	for word, value in pairs(words) do
		if textboxText == word then
			local redeemedCodes = myDataStore:GetAsync(player.UserId .. "redeemedCodes") or {}
			if redeemedCodes[word] then
				errorsound:Play()
				button.BackgroundColor3 = Color3.new(167/255, 55/255, 28/255)
				textbox.TextEditable = false
				wait(0.5)
				textbox.TextEditable = true
				button.BackgroundColor3 = Color3.new(68/255, 167/255, 57/255)
				return
			end
			clickSound:Play()
			wait(0.5)
			player.leaderstats.Dollar.Value = player.leaderstats.Dollar.Value + value
			found = true
			successsound:Play()
			redeemedCodes[word] = true
			myDataStore:SetAsync(player.UserId .. "redeemedCodes", redeemedCodes)
			break
		end
	end
	if not found then
		found = false
		errorsound:Play()
		button.BackgroundColor3 = Color3.new(167/255, 55/255, 28/255)
		textbox.TextEditable = false
		wait(0.5)
		textbox.TextEditable = true
		button.BackgroundColor3 = Color3.new(68/255, 167/255, 57/255)
	end
end)

local function hover()
	hoverSound:Play()
end
button.MouseEnter:Connect(hover)

Player.PlayerRemoving:Connect(function(player)
	local redeemedCodes = myDataStore:GetAsync(player.UserId .. "redeemedCodes") or {}
	myDataStore:SetAsync(player.UserId .. "redeemedCodes", redeemedCodes)
end)

"Make an advanced automatic train system. Formula calculates time for a train to stop perfectly at distance ST from position S. Vf=0, Vi=35mph, a=3.0 mph/s (deceleration)."

"create a shift to run script with run animations"

"when lecutio is said the person will lose 10 health every 2 seconds until they say stop"

"Add a function where it plays the animation when i click a master part tell me how to set it up"

"make the humanoid jump again after pressing spacebar in the air with custom animation also give it a small boost it make it look like they're jumping twice"

-- 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 isJumping = false
local doubleJumped = false

local function onJumpRequest()
	if not isJumping and humanoid:GetState() == Enum.HumanoidStateType.Landed then
		isJumping = true
		humanoid:ChangeState(Enum.HumanoidStateType.Jumping)
	elseif not doubleJumped and humanoid:GetState() ~= Enum.HumanoidStateType.Landed then
		doubleJumped = true
		humanoid:ChangeState(Enum.HumanoidStateType.Jumping)
		humanoid.JumpPower = 70
		local animation = Instance.new("Animation")
		animation.AnimationId = "rbxassetid://YourAnimationIDHere"
		local animTrack = humanoid:LoadAnimation(animation)
		animTrack:Play()
		wait(0.1)
		humanoid.JumpPower = 50
	end
end

local function onStateChanged(oldState, newState)
	if newState == Enum.HumanoidStateType.Landed then
		isJumping = false
		doubleJumped = false
	end
end

UserInputService.JumpRequest:Connect(onJumpRequest)
humanoid.StateChanged:Connect(onStateChanged)

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

-- main script (ServerScriptService) 
local remote = Instance.new("RemoteEvent")
remote.Name = "NightVisionRemote"
remote.Parent = game.ReplicatedStorage

-- local script (StarterPlayerScripts) 
local UserInputService = game:GetService("UserInputService")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local remote = ReplicatedStorage:WaitForChild("NightVisionRemote")
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")

local nightVisionEnabled = false
local currentMode = 1
local modes = {"NightVision", "Thermal", "Sonar"}

local function toggleNightVision()
    nightVisionEnabled = not nightVisionEnabled
    remote:FireServer(nightVisionEnabled, currentMode)
end

local function changeMode()
    currentMode = currentMode % #modes + 1
    if nightVisionEnabled then
        remote:FireServer(nightVisionEnabled, currentMode)
    end
end

UserInputService.InputBegan:Connect(function(input, gameProcessed)
    if gameProcessed then return end
    if input.KeyCode == Enum.KeyCode.N then
        toggleNightVision()
    elseif input.KeyCode == Enum.KeyCode.V then
        changeMode()
    end
end)

-- server script (ServerScriptService) 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local remote = ReplicatedStorage:WaitForChild("NightVisionRemote")

local function enableNightVision(player, mode)
    -- Implement night vision, thermal, and sonar modes here
    -- You can use Lighting service to change the environment for night vision
    -- For thermal and sonar, you can use raycasting or other techniques to detect humanoids
end

remote.OnServerEvent:Connect(function(player, nightVisionEnabled, mode)
    if nightVisionEnabled then
        enableNightVision(player, mode)
    else
        -- Reset the environment and effects
    end
end)

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

-- server script (ServerScriptService) 
local admins = {"Admin1", "Admin2", "Admin3"} -- add admin usernames here
local commands = {
    ["kick"] = function(player, targetName)
        local target = game.Players:FindFirstChild(targetName)
        if target then
            target:Kick("You have been kicked by an admin.")
        end
    end,
    ["ban"] = function(player, targetName)
        local target = game.Players:FindFirstChild(targetName)
        if target then
            target:Kick("You have been banned by an admin.")
            table.insert(admins, target.Name)
        end
    end,
    ["teleport"] = function(player, targetName)
        local target = game.Players:FindFirstChild(targetName)
        if target and target.Character and player.Character then
            player.Character.HumanoidRootPart.CFrame = target.Character.HumanoidRootPart.CFrame
        end
    end,
    ["heal"] = function(player)
        if player.Character then
            player.Character.Humanoid.Health = player.Character.Humanoid.MaxHealth
        end
    end,
    ["speed"] = function(player, speed)
        if player.Character then
            player.Character.Humanoid.WalkSpeed = tonumber(speed)
        end
    end,
}

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

local function processCommand(player, message)
    if isAdmin(player) and string.sub(message, 1, 1) == "/" then
        local commandParts = {}
        for part in string.gmatch(message, "%S ") do
            table.insert(commandParts, part)
        end
        local command = string.sub(commandParts[1], 2)
        local args = {unpack(commandParts, 2)}
        if commands[command] then
            commands[command](player, unpack(args))
        end
    end
end

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

"make a script that has one server and one local script that when activating a tool, it plays the audio "6590147536", then it summons a block behind the player that is 24.5, 26, 23.5, then it damages all players in a 200 stud radius besides the player who summoned it"

-- Server Script 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local createBlockEvent = Instance.new("RemoteEvent")
createBlockEvent.Name = "CreateBlockEvent"
createBlockEvent.Parent = ReplicatedStorage

local function damagePlayers(origin, radius, player)
    for _, otherPlayer in pairs(game:GetService("Players"):GetPlayers()) do
        if otherPlayer ~= player then
            local character = otherPlayer.Character
            local humanoid = character and character:FindFirstChild("Humanoid")
            local rootPart = character and character:FindFirstChild("HumanoidRootPart")
            if humanoid and rootPart then
                local distance = (rootPart.Position - origin).Magnitude
                if distance <= radius then
                    humanoid:TakeDamage(humanoid.MaxHealth)
                end
            end
        end
    end
end

createBlockEvent.OnServerEvent:Connect(function(player)
	local character = player.Character or player.CharacterAdded:Wait()
	local humanoidRootPart = character:FindFirstChild("HumanoidRootPart")
	
	if humanoidRootPart then
		local block = Instance.new("Part")
		block.Size = Vector3.new(24.5, 26, 23.5)
		block.Position = humanoidRootPart.Position - Vector3.new(0, 0, 5)
		block.Parent = game.Workspace
		
		damagePlayers(block.Position, 200, player)
	end
end)

-- Local Script 
local tool = script.Parent
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local createBlockEvent = ReplicatedStorage:WaitForChild("CreateBlockEvent")
local sound = Instance.new("Sound")
sound.SoundId = "rbxassetid://6590147536"
sound.Parent = tool

tool.Activated:Connect(function()
	sound:Play()
	createBlockEvent:FireServer()
end)

"script for an existing nonvisible ui that makes it fade in and swipe up when the player gains coins, showing how many coins they gained, for 2 seconds and then fade out"

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

local player = Players.LocalPlayer
local coinsGainedUI = script.Parent.CoinsGainedUI
local coinsGainedText = coinsGainedUI.CoinsGainedText

coinsGainedUI.Visible = false

local function showCoinsGained(oldValue, newValue)
    local coinsGained = newValue - oldValue
    coinsGainedText.Text = "+" .. tostring(coinsGained) .. " Coins"

local fadeInInfo = TweenInfo.new(0.5, Enum.EasingStyle.Linear, Enum.EasingDirection.In)
    local fadeOutInfo = TweenInfo.new(0.5, Enum.EasingStyle.Linear, Enum.EasingDirection.Out, 0, false, 1.5)
    local swipeUpInfo = TweenInfo.new(2, Enum.EasingStyle.Linear, Enum.EasingDirection.InOut)

local fadeIn = TweenService:Create(coinsGainedUI, fadeInInfo, {Visible = true, BackgroundTransparency = 0.5})
    local swipeUp = TweenService:Create(coinsGainedUI, swipeUpInfo, {Position = coinsGainedUI.Position + UDim2.new(0, 0, -0.1, 0)})
    local fadeOut = TweenService:Create(coinsGainedUI, fadeOutInfo, {Visible = false, BackgroundTransparency = 1})

fadeIn:Play()
    fadeIn.Completed:Wait()
    swipeUp:Play()
    swipeUp.Completed:Wait()
    fadeOut:Play()
end

player.leaderstats.Coins:GetPropertyChangedSignal("Value"):Connect(showCoinsGained)

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

"give me the entire script to copy and paste"

"Create a script that makes npcs play an animation"

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

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

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

"When in first person you are able to see your body"

"create a script that gives a player title over their head saying Beta with red color"

"whenever part is touched, its speed should increase"

"Write me a code for an NPC system that talks when a player talks with them. the NPC will be a simple dummy model."

"If a player touches this script's parent part, then it will play the sound inside this script's parent part."

"when i click R the block spawer will actvate"

"make a script that affects all parts named 2x that double the amount of bullets in the leaderstat as soon as a ball touches the part and after the part touches the 2x part then destroy the part"

"make a list of people who get it without buying gamepass"

"script a chair sit"

"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

"make it so that the letter when typing in a textbox bounces in"

"make a script when you say taco and 100 taco falls from the sky"

"Noclip toggle"

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

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

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

proximityPrompt.Triggered:Connect(lockUnlockDoor)

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

"create an Advanced Roblox MeepCity Outfit Changer GUI big script"

-- Server Script

local ReplicatedStorage = game:GetService("ReplicatedStorage")
local OutfitChanger = ReplicatedStorage:WaitForChild("OutfitChanger")

-- Client Script

local ReplicatedStorage = game:GetService("ReplicatedStorage")
local OutfitChanger = ReplicatedStorage:WaitForChild("OutfitChanger")

-- Create the GUI
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "OutfitChanger"
ScreenGui.Parent = game.Players.LocalPlayer.PlayerGui

local Frame = Instance.new("Frame")
Frame.Name = "MainFrame"
Frame.Size = UDim2.new(0, 300, 0, 200)
Frame.Position = UDim2.new(0.5, -150, 0.5, -100)
Frame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Frame.BorderSizePixel = 0
Frame.Parent = ScreenGui

local Title = Instance.new("TextLabel")
Title.Name = "Title"
Title.Size = UDim2.new(1, 0, 0, 50)
Title.Position = UDim2.new(0, 0, 0, 0)
Title.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Title.BorderSizePixel = 0
Title.Text = "Outfit Changer"
Title.TextColor3 = Color3.fromRGB(0, 0, 0)
Title.TextSize = 24
Title.TextWrapped = true
Title.TextXAlignment = Enum.TextXAlignment.Center
Title.TextYAlignment = Enum.TextYAlignment.Center
Title.Parent = Frame

local OutfitList = Instance.new("ScrollingFrame")
OutfitList.Name = "OutfitList"
OutfitList.Size = UDim2.new(1, 0, 0, 150)
OutfitList.Position = UDim2.new(0, 0, 0, 50)
OutfitList.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
OutfitList.BorderSizePixel = 0
OutfitList.BottomImage = ""
OutfitList.MidImage = ""
OutfitList.TopImage = ""
OutfitList.Parent = Frame

local OutfitListLayout = Instance.new("UIListLayout")
OutfitListLayout.Name = "OutfitListLayout"
OutfitListLayout.SortOrder = Enum.SortOrder.LayoutOrder
OutfitListLayout.Parent = OutfitList

-- Create the outfit buttons
for _, outfit in pairs(OutfitChanger:GetChildren()) do
	local OutfitButton = Instance.new("TextButton")
	OutfitButton.Name = outfit.Name
	OutfitButton.Size = UDim2.new(1, 0, 0, 50)
	OutfitButton.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
	OutfitButton.BorderSizePixel = 0
	OutfitButton.Text = outfit.Name
	OutfitButton.TextColor3 = Color3.fromRGB(0, 0, 0)
	OutfitButton.TextSize = 24
	OutfitButton.TextWrapped = true
	OutfitButton.TextXAlignment = Enum.TextXAlignment.Center
	OutfitButton.TextYAlignment = Enum.TextYAlignment.Center
	OutfitButton.Parent = OutfitList
	
	OutfitButton.MouseButton1Click:Connect(function()
		OutfitChanger:InvokeServer(outfit.Name)
	end)
end

"Make a script when you hover your mouse over a block it shows an outline until you stop hovering your mouse over it"

"make me a hacker gui wich lets me hack the game"

--
local hackerGui = Instance.new("ScreenGui")
hackerGui.Parent = game.Players.LocalPlayer.PlayerGui

local frame = Instance.new("Frame")
frame.Parent = hackerGui
frame.Position = UDim2.new(0.5, -200, 0.5, -200)
frame.Size = UDim2.new(0, 400, 0, 400)

local title = Instance.new("TextLabel")
title.Parent = frame
title.Position = UDim2.new(0, 0, 0, 0)
title.Size = UDim2.new(1, 0, 0, 50)
title.Text = "Hacker GUI"
title.TextSize = 30
title.Font = "SourceSansBold"
title.TextWrapped = true
title.TextXAlignment = "Center"

local button1 = Instance.new("TextButton")
button1.Parent = frame
button1.Position = UDim2.new(0, 0, 0, 50)
button1.Size = UDim2.new(1, 0, 0, 50)
button1.Text = "Change Gravity"
button1.TextSize = 20
button1.Font = "SourceSans"

button1.MouseButton1Click:Connect(function()
	game.Workspace.Gravity = 50
end)

local button2 = Instance.new("TextButton")
button2.Parent = frame
button2.Position = UDim2.new(0, 0, 0, 100)
button2.Size = UDim2.new(1, 0, 0, 50)
button2.Text = "Fly Mode"
button2.TextSize = 20
button2.Font = "SourceSans"

button2.MouseButton1Click:Connect(function()
	game.Players.LocalPlayer.Character.Humanoid.PlatformStand = true
end)

local button3 = Instance.new("TextButton")
button3.Parent = frame
button3.Position = UDim2.new(0, 0, 0, 150)
button3.Size = UDim2.new(1, 0, 0, 50)
button3.Text = "God Mode"
button3.TextSize = 20
button3.Font = "SourceSans"

button3.MouseButton1Click:Connect(function()
	game.Players.LocalPlayer.Character.Humanoid.MaxHealth = math.huge
end)

"model may be a child of a other model so check for that too"

"this script works but i need to have when hit it checks if i have enough rebirths to teleport 2 rebirths or more"

Sure, here is an example of how you can check if a player has enough rebirths to teleport using a server script.

```lua
local teleportPart = game.Workspace.TeleportPart -- replace with your part
local rebirthsNeeded = 2

local function onPartTouch(otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player then
        local leaderstats = player:FindFirstChild("leaderstats")
        if leaderstats then
            local rebirths = leaderstats:FindFirstChild("Rebirths")
            if rebirths and rebirths.Value >= rebirthsNeeded then
                -- teleport the player
                player.Character.HumanoidRootPart.CFrame = CFrame.new(0, 50, 0) -- replace with your teleport location
            else
                -- player does not have enough rebirths
                print(player.Name .. " does not have enough rebirths to teleport.")
            end
        end
    end
end

teleportPart.Touched:Connect(onPartTouch)
```

This script assumes that you have a leaderstats model in each player with a Rebirths IntValue inside it. If you're storing rebirths in a different way, you'll need to adjust the script to match.

"after ProximityPrompt is triggered the player has the tool in their hands"

"my part will follow players and if it touches a player it will do 25 damage"

"make a script with 1 local and 1 server script and a remote event, when using the parent tool, it will create a 21, 21, 21 sphere that will go towards where the mouse was aimed from the player, but will auto track any players 100 studs near it besides the summoner and kill them."

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

remoteEvent.OnServerEvent:Connect(function(player, mousePosition)
    local sphere = Instance.new("Part")
    sphere.Shape = Enum.PartType.Ball
    sphere.Size = Vector3.new(21, 21, 21)
    sphere.Position = mousePosition
    sphere.Parent = game.Workspace
    sphere.Touched:Connect(function(hit)
        local hitPlayer = game.Players:GetPlayerFromCharacter(hit.Parent)
        if hitPlayer and hitPlayer ~= player and (hitPlayer.Character.HumanoidRootPart.Position - sphere.Position).magnitude < 100 then
            hitPlayer.Character:BreakJoints()
        end
    end)
end)

-- Local Script (StarterPack) 
local tool = script.Parent
local remoteEvent = game.ReplicatedStorage:WaitForChild("SphereCreationEvent")

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

-- Script for auto-tracking behavior is not included as it would require a more complex implementation involving constant updates and checks for player positions, which is beyond the scope of a simple script response. If you need that functionality, it would involve using RunService and updating the sphere's position towards the nearest player every frame.

"Make a sell pad that sells Food add comments to code telling me where to put it in studio""

"create a simple admin script"

"Create a house with 4 walls and a door."

-- ScripterAI can only help with scripting as of now, so here's a script to create a simple house with 4 walls and a door in Roblox

local function createWall(size, position, parent)
    local wall = Instance.new("Part")
    wall.Size = size
    wall.Position = position
    wall.Anchored = true
    wall.BrickColor = BrickColor.new("Bright blue")
    wall.Parent = parent
end

local house = Instance.new("Model")
house.Name = "House"
house.Parent = game.Workspace

createWall(Vector3.new(10, 5, 1), Vector3.new(0, 2.5, 5), house) -- front wall
createWall(Vector3.new(10, 5, 1), Vector3.new(0, 2.5, -5), house) -- back wall
createWall(Vector3.new(1, 5, 10), Vector3.new(5, 2.5, 0), house) -- right wall
createWall(Vector3.new(1, 5, 8), Vector3.new(-5, 2.5, 2), house) -- left wall (with door gap)

local door = Instance.new("Part")
door.Size = Vector3.new(1, 5, 2)
door.Position = Vector3.new(-5, 2.5, -2)
door.Anchored = true
door.BrickColor = BrickColor.new("Pastel brown")
door.Parent = house -- door

"create small money simulator for purchasing products"

"create a script where if the player presses q they dodge and if they are moving either w,a,s, or d, have them dodge in the direction they hold down that movement button"

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

"Create a script that plays an animation when I click on a player, the animation is 12584847759 Make sure you use player:GetMouse()"

"light switch system"

"script that opens and and closes a frame when a ui button is clicked"

"Create a stunning admin menu complete with a list of players and buttons for banning kicking and warning each player"

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

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

local titleLabel = Instance.new("TextLabel", adminMenu)
titleLabel.Text = "Admin Menu"
titleLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
titleLabel.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
titleLabel.Size = UDim2.new(1, 0, 0.1, 0)

local playerList = Instance.new("ScrollingFrame", adminMenu)
playerList.Size = UDim2.new(1, 0, 0.9, 0)
playerList.Position = UDim2.new(0, 0, 0.1, 0)
playerList.CanvasSize = UDim2.new(0, 0, 10, 0)

local function createPlayerEntry(playerName)
    local playerEntry = Instance.new("Frame")
    playerEntry.Size = UDim2.new(1, 0, 0.1, 0)
    playerEntry.BackgroundColor3 = Color3.fromRGB(40, 40, 40)

local nameLabel = Instance.new("TextLabel", playerEntry)
    nameLabel.Text = playerName
    nameLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
    nameLabel.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
    nameLabel.Size = UDim2.new(0.5, 0, 1, 0)

local banButton = Instance.new("TextButton", playerEntry)
    banButton.Text = "Ban"
    banButton.TextColor3 = Color3.fromRGB(255, 255, 255)
    banButton.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
    banButton.Size = UDim2.new(0.15, 0, 1, 0)
    banButton.Position = UDim2.new(0.5, 0, 0, 0)

local kickButton = Instance.new("TextButton", playerEntry)
    kickButton.Text = "Kick"
    kickButton.TextColor3 = Color3.fromRGB(255, 255, 255)
    kickButton.BackgroundColor3 = Color3.fromRGB(255, 165, 0)
    kickButton.Size = UDim2.new(0.15, 0, 1, 0)
    kickButton.Position = UDim2.new(0.65, 0, 0, 0)

local warnButton = Instance.new("TextButton", playerEntry)
    warnButton.Text = "Warn"
    warnButton.TextColor3 = Color3.fromRGB(255, 255, 255)
    warnButton.BackgroundColor3 = Color3.fromRGB(255, 255, 0)
    warnButton.Size = UDim2.new(0.15, 0, 1, 0)
    warnButton.Position = UDim2.new(0.8, 0, 0, 0)

return playerEntry
end

local function updatePlayerList()
    for i, player in ipairs(game.Players:GetPlayers()) do
        local playerEntry = createPlayerEntry(player.Name)
        playerEntry.Parent = playerList
        playerEntry.Position = UDim2.new(0, 0, (i - 1) * 0.1, 0)
    end
end

game.Players.PlayerAdded:Connect(updatePlayerList)
game.Players.PlayerRemoving:Connect(updatePlayerList)

updatePlayerList()

"when players join the game it will make them rejoin"

"also make sure it can run on local player, and make sure it remembers the last position and if the player is repositioned back then bypass it"

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

local lastPosition = character.HumanoidRootPart.Position
local isRunning = false

local function onKeyPress(input)
    if input.KeyCode == Enum.KeyCode.W then
        humanoid.WalkSpeed = 50
        isRunning = true
    end
end

local function onKeyRelease(input)
    if input.KeyCode == Enum.KeyCode.W then
        humanoid.WalkSpeed = 16
        isRunning = false
    end
end

local function onCharacterMoved()
    if isRunning and (character.HumanoidRootPart.Position - lastPosition).Magnitude > 5 then
        character.HumanoidRootPart.Position = lastPosition
    else
        lastPosition = character.HumanoidRootPart.Position
    end
end

UserInputService.InputBegan:Connect(onKeyPress)
UserInputService.InputEnded:Connect(onKeyRelease)
character.HumanoidRootPart.Changed:Connect(onCharacterMoved)

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

"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

"write a gui button script that has an image as the gui and when clicked plays an audio"

"make it so to desplay temperature it gets a gui in playergui named temp and modifyings temptext.text to display it, and make sure that its not always gonna be a even numbered temperature for realism. it would most realistically be a odd number, but even numbers would obviously still appear"

To implement the feature where the temperature is displayed in a GUI within the player's screen and ensuring that the temperature displayed is not always an even number for realism, you can follow the script below. This script modifies the existing one to include a GUI update mechanism and introduces a more nuanced approach to temperature calculation to allow for both odd and even numbers.

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

local function onCharacterAdded(character)
    local humanoid = character:WaitForChild("Humanoid")
    local player = Players:GetPlayerFromCharacter(character)
    local shirt = character:FindFirstChildOfClass("Shirt")
    local pants = character:FindFirstChildOfClass("Pants")
    local temp = 70

-- Ensure the player has a GUI for temperature
    local playerGui = player:WaitForChild("PlayerGui")
    local tempGui
    if playerGui:FindFirstChild("TempGui") then
        tempGui = playerGui.TempGui.TempText
    else
        local screenGui = Instance.new("ScreenGui")
        screenGui.Name = "TempGui"
        screenGui.Parent = playerGui
        local textLabel = Instance.new("TextLabel")
        textLabel.Name = "TempText"
        textLabel.Size = UDim2.new(0, 200, 0, 50)
        textLabel.Position = UDim2.new(0, 10, 0, 10)
        textLabel.Text = "Temperature: 70°F"
        textLabel.Parent = screenGui
        tempGui = textLabel
    end

local function updateTemperature(part)
        local timeOfDay = game.Lighting.TimeOfDay
        local hour = tonumber(string.sub(timeOfDay, 1, string.find(timeOfDay, ":") - 1))
        local isDay = hour > 6 and hour < 20
        local tempAdjust = (shirt and pants) and 5 or 0

if part.Name == "LeafyGrass" or part.Name == "Grass" then
            temp = isDay and 75 or 65
        elseif part.Name == "Snow" then
            temp = isDay and 32 or 25
        elseif part.Name == "Sand" then
            temp = isDay and 90 or 70
        end

temp = temp + tempAdjust

-- Randomize temperature slightly to include odd and even numbers
        temp = temp + math.random(-2, 2)

tempGui.Text = "Temperature: "..temp.."°F"
    end

humanoid.Touched:Connect(function(hit)
        updateTemperature(hit)
    end)
end

Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(onCharacterAdded)
end)
```

This script ensures that when a player's character touches different terrains, the temperature is calculated based on the time of day, whether the character is wearing a shirt and pants, and the type of terrain. It then slightly randomizes the temperature to include both odd and even numbers for realism. The temperature is displayed in a GUI element named `TempGui` with a `TextLabel` named `TempText`, which is created if it does not already exist in the player's GUI.

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

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

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

button.MouseButton1Click:Connect(onButtonClicked)

"make me a script that blocks exploiters and hackers from injecting scripts and also make it where exploiters cant stop the exploit script"

"script for a zombie with replacable animations for attacks, idles, and walk animation and tell me where everything goes"

-- server script (ServerScriptService) 
local Zombie = game.Workspace.Zombie -- Make sure to place a model named "Zombie" in the Workspace
local animationController = Zombie.AnimationController -- Add an AnimationController to the Zombie model

-- Replace these IDs with your own animation IDs
local attackAnimationId = "rbxassetid://123456789"
local idleAnimationId = "rbxassetid://987654321"
local walkAnimationId = "rbxassetid://123498765"

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

local attackTrack = animationController:LoadAnimation(attackAnimation)
local idleTrack = animationController:LoadAnimation(idleAnimation)
local walkTrack = animationController:LoadAnimation(walkAnimation)

-- Function to play attack animation
local function playAttackAnimation()
    attackTrack:Play()
end

-- Function to play idle animation
local function playIdleAnimation()
    idleTrack:Play()
end

-- Function to play walk animation
local function playWalkAnimation()
    walkTrack:Play()
end

-- You can call these functions whenever you want to play the respective animations
-- For example, you can use Touched event for attack animation, or use a loop for walk animation
-- For now, let's use a simple loop to play idle and walk animations alternatively

while true do
    playIdleAnimation()
    wait(5) -- Adjust the wait time as needed
    playWalkAnimation()
    wait(5) -- Adjust the wait time as needed
end

-- Instructions 
1. Create a model named "Zombie" in the Workspace and add a Humanoid and AnimationController to it.
2. Add the server script provided above to ServerScriptService.
3. Replace the animation IDs in the script with your own animation IDs.
4. Customize the script as needed to play the animations based on events or conditions in your game.

"Make a data store script that refreshes a players data every 2 minutes and saves it"

-- server script (ServerScriptService) 
local DataStoreService = game:GetService("DataStoreService")
local playerDataStore = DataStoreService:GetDataStore("PlayerData")

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

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

local function loadData(player)
    local success, data = pcall(function()
        return playerDataStore:GetAsync(player.UserId)
    end)

if success and data then
        player.leaderstats.Coins.Value = data.coins
        player.leaderstats.Bag.Value = data.bag
    else
        warn("Failed to load data for player " .. player.Name)
    end
end

local function onPlayerAdded(player)
    player:WaitForChild("leaderstats")
    loadData(player)

while wait(2 * 60) do
        saveData(player)
    end
end

local function onPlayerRemoving(player)
    saveData(player)
end

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

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

-- script for leaderboard 
local players = game:GetService("Players")
local dataStore = game:GetService("DataStoreService"):GetDataStore("WinsData")

local function onPlayerAdded(player)
    local wins = Instance.new("IntValue")
    wins.Name = "Wins"
    wins.Parent = player

local savedWins
    local success, err = pcall(function()
        savedWins = dataStore:GetAsync(player.UserId .. "-Wins")
    end)

if success and savedWins then
        wins.Value = savedWins
    else
        wins.Value = 0
    end
end

local function onPlayerRemoving(player)
    local wins = player.Wins.Value
    local success, err = pcall(function()
        dataStore:SetAsync(player.UserId .. "-Wins", wins)
    end)
    if not success then
        warn("Error saving wins for player: " .. player.Name)
    end
end

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

for _, player in ipairs(players:GetPlayers()) do
    onPlayerAdded(player)
end

-- script for part 
local part = script.Parent

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

part.Touched:Connect(onTouched)

"make a script to kick players with only people in this group here is the group id 16482574 and people with only rank 252 and higher can you this command there is a gui in the game i want you to connect it too so that if you click a button i want you"

"make a server script that renames server script service to SSS"

"make a script that loop teleports my character 15 studs above a close opposite team player when i press r and stops when i press r again"

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

local function teleport()
    for _, otherPlayer in pairs(Players:GetPlayers()) do
        if otherPlayer.TeamColor ~= player.TeamColor then
            local otherCharacter = otherPlayer.Character
            if otherCharacter then
                local otherPos = otherCharacter.HumanoidRootPart.Position
                local myPos = character.HumanoidRootPart.Position

if (myPos - otherPos).Magnitude < 50 then
                    character.HumanoidRootPart.CFrame = CFrame.new(otherPos + Vector3.new(0, 15, 0))
                    break
                end
            end
        end
    end
end

local function onKeyPress(input)
    if input.KeyCode == Enum.KeyCode.R then
        if teleporting then
            teleporting = false
        else
            teleporting = true
            while teleporting do
                teleport()
                wait(0.5)
            end
        end
    end
end

UserInputService.InputBegan:Connect(onKeyPress)

"a roblox script that teleports you 3 studs back every 5 seconds, and tell where to put it"

"make the bright red parts give a value of 1 money when getting deleted also only delete the bright red parts and then give the money"

"Let the player character face direction of the X-Axis, show me how and where to insert it."

"A looping script that detects and removes a tool named "Tackle" when you have a tool named "Football" in your inventory, but when a tool named "Football" is NOT in your inventory, script gives you the tool named "Tackle". Add comments to code"

"create a admin roblox lua panel"

"make shift run"

"Write me a script for a death system that causes the player to ragdoll instead of the default death."

"make a script so whenever you press r you fly but it wont use basic fly it will use tween meaning you can fly anywhere with tween"

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

local function onCharacterAdded(newCharacter)
	character = newCharacter
end

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

local function fly()
	if character and not flying then
		flying = true
		local humanoid = character:FindFirstChild("Humanoid")
		if humanoid then
			humanoid.PlatformStand = true
		end
		local flyConnection
		flyConnection = UserInputService.InputBegan:Connect(function(input, gameProcessed)
			if input.UserInputType == Enum.UserInputType.MouseButton1 and not gameProcessed then
				local targetPosition = UserInputService:GetMouseLocation() + Vector2.new(0, 36)
				local currentPosition = character.HumanoidRootPart.Position
				local distance = (targetPosition - currentPosition).magnitude
				local tweenInfo = TweenInfo.new(distance / 100, Enum.EasingStyle.Linear)
				local tween = TweenService:Create(character.HumanoidRootPart, tweenInfo, {Position = targetPosition})
				tween:Play()
			end
		end)
		return flyConnection
	end
end

local function stopFly(flyConnection)
	if character and flying then
		flying = false
		local humanoid = character:FindFirstChild("Humanoid")
		if humanoid then
			humanoid.PlatformStand = false
		end
		if flyConnection then
			flyConnection:Disconnect()
		end
	end
end

UserInputService.InputBegan:Connect(function(input, gameProcessed)
	if input.KeyCode == Enum.KeyCode.R and not gameProcessed then
		if not flying then
			local flyConnection = fly()
		else
			stopFly(flyConnection)
		end
	end
end)

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

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

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

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

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

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

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

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

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

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

"make an animated Play button"

"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 and disappears. then the 0.1x0.1 blocks disappear after 2 seconds"

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

local function onTouched(hit)
        part.BrickColor = BrickColor.new("Really black")
        wait(2)
        local directions = {
            Vector3.new(1, 0, 0),
            Vector3.new(-1, 0, 0),
            Vector3.new(0, 1, 0),
            Vector3.new(0, -1, 0),
            Vector3.new(0, 0, 1),
            Vector3.new(0, 0, -1)
        }
        for _, direction in ipairs(directions) do
            local smallPart = Instance.new("Part")
            smallPart.Parent = game.Workspace
            smallPart.Position = part.Position
            smallPart.Size = Vector3.new(0.1, 0.1, 0.1)
            smallPart.BrickColor = BrickColor.new("Really black")
            smallPart.Velocity = direction * 50
            smallPart.Anchored = false
            smallPart.CanCollide = true
            game:GetService("Debris"):AddItem(smallPart, 2)
        end
        part:Destroy()
    end

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