Haddock - Roblox Library

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

"Make me a Script for an Admin System where the Admins Can ban and TempBan make sure to add a Prefix of ? and Make sure the TempBan Duration can be whatever the Admin Types in chat like ?TempBan user 600M that is Minutes or 600H for Hours"

-- Admin script (ServerScriptService) 
local admins = {"Admin1", "Admin2"} -- 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 onChat(player, message)
    if isAdmin(player.Name) then
        local args = {}
        for word in message:gmatch("%S+") do
            table.insert(args, word)
        end

local command = args[1]

if command == prefix.."ban" and args[2] then
            local target = game.Players:FindFirstChild(args[2])
            if target then
                target:Kick("You have been banned by an admin.")
            end
        elseif command == prefix.."tempban" and args[2] and args[3] then
            local target = game.Players:FindFirstChild(args[2])
            local duration = tonumber(args[3]:match("%d+"))
            local timeUnit = args[3]:match("%a")

if target and duration and timeUnit then
                local banTime = 0
                if timeUnit == "M" then
                    banTime = duration * 60
                elseif timeUnit == "H" then
                    banTime = duration * 60 * 60
                end

target:Kick("You have been temporarily banned for " .. duration .. " " .. timeUnit .. ".")
                wait(banTime)

-- Unban the player by allowing them to rejoin after the ban duration
            end
        end
    end
end

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

"if players reach 1,000,000,000 Money it will stop it from going higher than that and with Kampfkarren DataStore2 with clear instructions"

"create a server-side script that detects when the fire is being spammed at once or a script has been created more than 10 times. and whenever the spam is being detected spam delete all fire and write 1 hint for 5 seconds that says [KAV] Unexpected execution detection attempting to delete | | | Detection: Fire spam"

To create a server-side script that detects when the "fire" is being created more than 10 times in a short period and deletes all instances of the fire while displaying a hint, you can use the following script. This script assumes that the "fire" instances are being created under a specific parent (e.g., `game.Workspace`), and you will need to adjust the script if the fires are being created elsewhere.

```lua
local fireCount = 0
local fireInstances = {}
local spamThreshold = 10 -- Number of fires that are considered spam
local checkInterval = 1 -- Time in seconds to reset the fire count
local hintDuration = 5 -- Duration for the hint to be displayed

-- Function to remove all fire instances and display a hint
local function handleFireSpam()
    -- Remove all fire instances
    for _, fire in pairs(fireInstances) do
        if fire and fire.Parent then
            fire:Destroy()
        end
    end
    fireInstances = {}
    
    -- Display a hint
    local hint = Instance.new("Hint", game.Workspace)
    hint.Text = "[KAV] Unexpected execution detection attempting to delete | | | Detection: Fire spam"
    wait(hintDuration)
    hint:Destroy()
end

-- Function to monitor fire creation
local function onFireAdded(fire)
    fireCount = fireCount + 1
    table.insert(fireInstances, fire)

-- Check for spam
    if fireCount >= spamThreshold then
        handleFireSpam()
    end
end

-- Connect the function to the event of a fire instance being added
game.Workspace.ChildAdded:Connect(function(child)
    if child:IsA("Fire") then
        onFireAdded(child)
    end
end)

-- Reset the fire count periodically
while true do
    wait(checkInterval)
    fireCount = 0
end
```

This script should be placed in `ServerScriptService` to monitor the creation of fire instances. When the script detects that the threshold of fire instances has been reached within the specified interval, it will delete all fire instances and display a hint to all players for 5 seconds.

Please note that this is a simple implementation and may need to be adjusted based on the specific mechanics of your game, such as how and where fire instances are created. You may also need to implement additional checks to prevent false positives if there are legitimate reasons for multiple fires to be created in quick succession.

"white list role Rifleman for this helmet . local module = { typea = "Helmet", WhiteLists = { "Rifleman" }, } return module"

"a datastore for tools in players backpack when players leave and load in"

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

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

local data
    local success, errorMessage = pcall(function()
        data = toolDataStore:GetAsync(player.UserId)
    end)

if success and data then
        for _, toolName in ipairs(data) do
            local tool = game.ServerStorage.Tools:FindFirstChild(toolName)
            if tool then
                tool:Clone().Parent = playerTools
            end
        end
    end
end)

game.Players.PlayerRemoving:Connect(function(player)
    local playerTools = player:FindFirstChild("PlayerTools")
    if playerTools then
        local data = {}
        for _, tool in ipairs(playerTools:GetChildren()) do
            table.insert(data, tool.Name)
        end

local success, errorMessage = pcall(function()
            toolDataStore:SetAsync(player.UserId, data)
        end)

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

"anchor the humanoid rootpart"

"make a little rpg system that updates when a humanoid is killed"

"elseif statement doesnt work"

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

"make a textlabel show the cash leaderstat and make it update every milisecond and make it work inside the textlabel without adding any gui or frames or textlabels also only edit the textframe that says 'Label'"

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

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

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

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

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

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

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

tool.Equipped:Connect(onEquipped)

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

"make it work as a slider"

"make a script with a draggable gui that gives me the option to change the amount of health I have"

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

local gui = script.Parent
local healthSlider = gui.HealthSlider
local healthValue = gui.HealthValue

local function updateHealth()
    local newHealth = tonumber(healthValue.Text)
    if newHealth and newHealth >= 0 and newHealth <= humanoid.MaxHealth then
        humanoid.Health = newHealth
    else
        healthValue.Text = tostring(humanoid.Health)
    end
end

healthSlider.MouseButton1Down:Connect(function()
    local mouse = player:GetMouse()
    local dragging = true
    local initialPos = gui.Position

local function drag()
        if dragging then
            local newPos = UDim2.new(0, mouse.X, 0, mouse.Y)
            gui.Position = newPos
        end
    end

mouse.Move:Connect(drag)
    mouse.Button1Up:Connect(function()
        dragging = false
    end)
end)

healthValue.FocusLost:Connect(updateHealth)

"search through all the children in game.Workspace.Vehicles and find the designated vehicle by using game.Workspace.Vehicles.Pickup.Seat.Value = bailbot1 and then tween all the children to CFrame.new(0, 1000, 0)"

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

"Make a system of keyed doors of your certain color, just like piggy doors. Type when the player presses the proximity prompt of the door, it will check if the player has a key of a certain color, equipped. If yes the door will open with tweenservice rotating from the primary part of it."

-- script for the door 
local proximityPrompt = script.Parent:FindFirstChild("ProximityPrompt")
local tweenService = game:GetService("TweenService")
local door = script.Parent.Door -- assuming the door part is named "Door"
local doorColor = door.BrickColor.Name -- get the color of the door
local openTween = tweenService:Create(door, TweenInfo.new(1), {Rotation = Vector3.new(0, 90, 0)}) -- change the rotation values as needed

function onProximityPromptTriggered(player)
	local character = player.Character
	if character then
		local humanoid = character:FindFirstChild("Humanoid")
		if humanoid then
			local tool = humanoid:FindFirstChildOfClass("Tool")
			if tool and tool.BrickColor.Name == doorColor then -- check if the tool color matches the door color
				openTween:Play()
			end
		end
	end
end

proximityPrompt.Triggered:Connect(onProximityPromptTriggered)

-- script for the key tool 
local tool = Instance.new("Tool")
tool.Name = "Key"
tool.RequiresHandle = false
tool.CanBeDropped = true
tool.BrickColor = BrickColor.new("Bright yellow") -- change the color as needed

local handle = Instance.new("Part", tool)
handle.Name = "Handle"
handle.BrickColor = tool.BrickColor
handle.Size = Vector3.new(1, 1, 1)

tool.Parent = game.StarterPack

"create me the da hood revolver weapon"

-- local script 
local part = script.Parent
local gun = Instance.new("Model")
gun.Name = "DaHoodRevolver"
gun.Parent = part

local handle = Instance.new("Part")
handle.Name = "Handle"
handle.Size = Vector3.new(1, 2, 1)
handle.Parent = gun

local barrel = Instance.new("Part")
barrel.Name = "Barrel"
barrel.Size = Vector3.new(1, 1, 3)
barrel.Parent = gun

local trigger = Instance.new("Part")
trigger.Name = "Trigger"
trigger.Size = Vector3.new(1, 0.5, 0.5)
trigger.Parent = gun

local bullet = Instance.new("Part")
bullet.Name = "Bullet"
bullet.Size = Vector3.new(0.5, 0.5, 0.5)
bullet.Parent = gun

local sound = Instance.new("Sound")
sound.Name = "ShootSound"
sound.SoundId = "rbxassetid://YourSoundIDHere"
sound.Parent = gun

local animation = Instance.new("Animation")
animation.Name = "ShootAnimation"
animation.AnimationId = "rbxassetid://YourAnimationIDHere"
animation.Parent = gun

local function shoot()
	bullet.CFrame = barrel.CFrame * CFrame.new(0, 0, 3)
	sound:Play()
	animation:Play()
	wait(1)
	bullet.CFrame = handle.CFrame
end

trigger.MouseButton1Down:Connect(shoot)

"make it so when you say ME HAS RABAX then create noobs that loop spawn and say RABAX? and follow you."

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

"Create a vote kick script in a serverscript. Yes, no buttons and text label are placed at game.StarterGui.VoteKickGui.Frame"

"make a script that spins my character at 300 speed"

"Q key for dribbling the ball"

"Create a script so when executed is keeps checking every 0.1 secs using task.wait for any modified body if a players body parts were modified then then delete them work space and write a hint that says this [Server Defender] Removed Possible abusive script from player under the name of (Playersuser)"

Here's a script that checks every player's character in the game every 0.1 seconds for any non-default body parts (parts that were not originally part of the character model). If it finds any, it will remove the player's character from the game and display a hint message with the player's username. Please note that this script might be overly aggressive and could potentially remove legitimate customizations or accessories, so use it with caution.

```lua
local serverDefenderHint = Instance.new("Hint")
serverDefenderHint.Parent = game.Workspace
serverDefenderHint.Text = "[Server Defender] Monitoring for unauthorized character modifications."

local function checkForModifiedBodyParts(player)
    local character = player.Character
    if character then
        -- List of default body parts names
        local defaultBodyParts = {
            "Head",
            "Torso",
            "Left Arm",
            "Right Arm",
            "Left Leg",
            "Right Leg",
            "HumanoidRootPart",
        }
        local defaultPartsSet = {}
        for _, partName in ipairs(defaultBodyParts) do
            defaultPartsSet[partName] = true
        end
        
        for _, part in ipairs(character:GetChildren()) do
            if part:IsA("BasePart") and not defaultPartsSet[part.Name] then
                -- Found a non-default body part, remove the character and display a hint
                character:Destroy()
                serverDefenderHint.Text = "[Server Defender] Removed Possible abusive script from player under the name of " .. player.Name
                break
            end
        end
    end
end

local function monitorPlayers()
    while true do
        for _, player in ipairs(game.Players:GetPlayers()) do
            checkForModifiedBodyParts(player)
        end
        task.wait(0.1)
    end
end

-- Start monitoring when the script runs
monitorPlayers()
```

This script can be placed in a Script object within ServerScriptService. It will continuously check all players' characters for any parts that are not in the defaultBodyParts list. If it finds any, it will remove the character and display a hint with the player's username.

"Player is not a valid member of Player "Players.Cth4n" erroring line 3"

-- The error is because you are trying to access the player's name directly from the click parameter which is not valid. 
You should use the click parameter to get the player who clicked. Here's the corrected code:

-- local script 
local function onClick(player)
    local playerGui = player:WaitForChild("PlayerGui")

if Settings.WhitelistedPlayers[player.Name] or player:IsInGroup(Settings.MinID) then
        if not playerGui:FindFirstChild("selectGUI") then
            local clonedGui = gui:Clone()
            clonedGui.Parent = playerGui

toggleTween(clonedGui)

local RedButton = clonedGui.ImageLabel.Red    
            local BlueButton = clonedGui.ImageLabel.Blue
            local PurpleButton = clonedGui.ImageLabel.Purple
            local HexTextBox = clonedGui.ImageLabel:WaitForChild("HexTextBox")

local ConfirmButton = clonedGui.ImageLabel.ConfirmButton
            local IncreaseButton = clonedGui.ImageLabel.BrightnessDisplay.Increase
            local DecreaseButton = clonedGui.ImageLabel.BrightnessDisplay.Decrease

RedButton.MouseButton1Click:Connect(function()
                changeLightColor(Color3.fromRGB(255, 0, 0)) -- Red
            end)

BlueButton.MouseButton1Click:Connect(function()
                changeLightColor(Color3.fromRGB(0, 0, 255)) -- Blue
            end)

PurpleButton.MouseButton1Click:Connect(function()
                changeLightColor(Color3.fromRGB(128, 0, 255)) -- Purple (adjust RGB values as needed)
            end)

local Increase = clonedGui.Increase
            local Decrease = clonedGui.Decrease
            Increase.OnServerEvent:Connect(function(player, brightnessValue)
                increaseBrightness(brightnessValue)
            end)
            Decrease.OnServerEvent:Connect(function(player, brightnessValue)
                decreaseBrightness(brightnessValue)
            end)

local RemoteEvent = clonedGui.ChangeColor
            RemoteEvent.OnServerEvent:Connect(function(player, color)
                changeLightColor(color)
            end)

local exitButton = clonedGui.ImageLabel.Exit

exitButton.MouseButton1Click:Connect(function()
                clonedGui:Destroy()
            end)
        end
    end
end

script.Parent.ClickDetector.MouseClick:Connect(onClick)

"adopt me script that allows to pet farm and baby farm at the same time with a button and when preesed enable/disable the pet and baby auto farm and add a button that when preeesed is labeld hide hides the window"

-- main script 
local ScreenGui = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local AutoFarmButton = Instance.new("TextButton")
local HideButton = Instance.new("TextButton")

ScreenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
Frame.Parent = ScreenGui
AutoFarmButton.Parent = Frame
HideButton.Parent = Frame

Frame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
Frame.BorderSizePixel = 0
Frame.Position = UDim2.new(0.5, -100, 0.5, -50)
Frame.Size = UDim2.new(0, 200, 0, 100)

AutoFarmButton.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
AutoFarmButton.BorderSizePixel = 0
AutoFarmButton.Position = UDim2.new(0.25, 0, 0.25, 0)
AutoFarmButton.Size = UDim2.new(0, 100, 0, 50)
AutoFarmButton.Text = "Enable Auto Farm"
AutoFarmButton.TextColor3 = Color3.fromRGB(0, 0, 0)
AutoFarmButton.TextScaled = true

HideButton.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
HideButton.BorderSizePixel = 0
HideButton.Position = UDim2.new(0.25, 0, 0.75, 0)
HideButton.Size = UDim2.new(0, 100, 0, 50)
HideButton.Text = "Hide"
HideButton.TextColor3 = Color3.fromRGB(0, 0, 0)
HideButton.TextScaled = true

local autoFarmEnabled = false
local function toggleAutoFarm()
    autoFarmEnabled = not autoFarmEnabled
    AutoFarmButton.Text = autoFarmEnabled and "Disable Auto Farm" or "Enable Auto Farm"
    -- Add auto farm functionality for pet and baby here
end

local function hideWindow()
    Frame.Visible = not Frame.Visible
    HideButton.Text = Frame.Visible and "Hide" or "Show"
end

AutoFarmButton.MouseButton1Click:Connect(toggleAutoFarm)
HideButton.MouseButton1Click:Connect(hideWindow)

-- Note: This script provides the UI for toggling auto farm and hiding the window. Actual auto farming functionality for pets and babies should be implemented within the game's specific mechanics.

"make an event that gives all players the face accessory of a specific id and the head accessory of a specific id for 60 seconds"

-- server script (ServerScriptService) 
local faceAccessoryID = 12345678 -- Replace with the specific face accessory ID
local headAccessoryID = 87654321 -- Replace with the specific head accessory ID
local players = game:GetService("Players")

local function giveAccessories()
    for _, player in ipairs(players:GetPlayers()) do
        local character = player.Character
        if character then
            local faceAccessory = Instance.new("Accessory")
            faceAccessory.Parent = character
            faceAccessory.Name = "TemporaryFaceAccessory"
            local faceHandle = game:GetService("InsertService"):LoadAsset(faceAccessoryID):GetChildren()[1]
            faceHandle.Parent = faceAccessory

local headAccessory = Instance.new("Accessory")
            headAccessory.Parent = character
            headAccessory.Name = "TemporaryHeadAccessory"
            local headHandle = game:GetService("InsertService"):LoadAsset(headAccessoryID):GetChildren()[1]
            headHandle.Parent = headAccessory
        end
    end
    wait(60)
    removeAccessories()
end

local function removeAccessories()
    for _, player in ipairs(players:GetPlayers()) do
        local character = player.Character
        if character then
            local faceAccessory = character:FindFirstChild("TemporaryFaceAccessory")
            local headAccessory = character:FindFirstChild("TemporaryHeadAccessory")
            if faceAccessory then
                faceAccessory:Destroy()
            end
            if headAccessory then
                headAccessory:Destroy()
            end
        end
    end
end

game:GetService("ReplicatedStorage").GiveAccessoriesEvent.OnServerEvent:Connect(giveAccessories)

-- Add a RemoteEvent named "GiveAccessoriesEvent" to ReplicatedStorage

"Give me a script that makes the character ragdoll on death, instead of his limbs falling off. The ragdoll uses ball socket attachments for the limbs."

"make a script that finds a model, tween changes position to -0.5, -7.303, 1.429 and orientation to -5.938, 0, 0"

"create a text button that shows how many players are playing in a different game place."

"create a script that allows an entity to move through a 3 x 6 grid ahen the arrow keys are pressed"

-- local script 
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoidRootPart = character:WaitForChild("HumanoidRootPart")

local gridSize = Vector3.new(3, 0, 6)
local moveSpeed = 0.5

local function move(direction)
    local newPosition = humanoidRootPart.Position + (gridSize * direction)
    humanoidRootPart:MoveTo(newPosition)
end

local function onKeyPress(actionName, userInputState, inputObject)
    if userInputState == Enum.UserInputState.Begin then
        if actionName == "MoveUp" then
            move(Vector3.new(0, 0, -1))
        elseif actionName == "MoveDown" then
            move(Vector3.new(0, 0, 1))
        elseif actionName == "MoveLeft" then
            move(Vector3.new(-1, 0, 0))
        elseif actionName == "MoveRight" then
            move(Vector3.new(1, 0, 0))
        end
    end
end

local contextActionService = game:GetService("ContextActionService")
contextActionService:BindAction("MoveUp", onKeyPress, false, Enum.KeyCode.W, Enum.KeyCode.Up)
contextActionService:BindAction("MoveDown", onKeyPress, false, Enum.KeyCode.S, Enum.KeyCode.Down)
contextActionService:BindAction("MoveLeft", onKeyPress, false, Enum.KeyCode.A, Enum.KeyCode.Left)
contextActionService:BindAction("MoveRight", onKeyPress, false, Enum.KeyCode.D, Enum.KeyCode.Right)

"can you make a server script that will teleport me to a random position if i touch a part"

"script for a part. give the player a random gear from Gear folder in replicatedstorage every 5 minutes if they are stage 210 and touch the part. clientsided countdown for each player on a screenui on the part. add detailed comments and instructions"

-- First, create a folder named "Gear" in ReplicatedStorage and put the gears you want to give to the player inside it.

-- Server script for the part 
local part = script.Parent
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local gearFolder = ReplicatedStorage:WaitForChild("Gear")

local function giveRandomGear(player)
    local gears = gearFolder:GetChildren()
    local randomGear = gears[math.random(1, #gears)]:Clone()
    randomGear.Parent = player.Backpack
end

local function onTouch(otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player and player.leaderstats.Stage.Value >= 210 then
        giveRandomGear(player)
    end
end

part.Touched:Connect(onTouch)

-- Local script for the countdown UI 
local part = script.Parent
local player = game.Players.LocalPlayer
local countdownUI = Instance.new("BillboardGui")
local countdownText = Instance.new("TextLabel")

countdownUI.Parent = part
countdownUI.Size = UDim2.new(0, 100, 0, 50)
countdownUI.Adornee = part

countdownText.Parent = countdownUI
countdownText.Size = UDim2.new(1, 0, 1, 0)
countdownText.BackgroundTransparency = 1
countdownText.TextColor3 = Color3.new(1, 1, 1)
countdownText.Font = Enum.Font.SourceSans
countdownText.TextScaled = true

local function updateCountdown(timeLeft)
    countdownText.Text = "Time left: " .. timeLeft .. "s"
end

local function startCountdown()
    local timeLeft = 300
    while true do
        updateCountdown(timeLeft)
        wait(1)
        timeLeft = timeLeft - 1
        if timeLeft <= 0 then
            timeLeft = 300
        end
    end
end

startCountdown()

-- Instructions:
1. Create a folder named "Gear" in ReplicatedStorage and put the gears you want to give to the player inside it.
2. Make sure the part you want the player to touch has the server script as a child.
3. Make sure the part you want the player to touch has the local script as a child.
4. Run the game, when players with stage 210 or higher touch the part, they will receive a random gear from the Gear folder every 5 minutes.
5. The countdown UI will be displayed above the part, showing the time left for the next gear to be given.

"create a movement system where you can slide (by holding c and running, sliding's speed decays really fast and eventually stops you from sliding), crouch (by holding c), run (by pressing shift), walk and have an idle animation where do i put the code"

-- local script 
local UserInputService = game:GetService("UserInputService")
local player = game.Players.LocalPlayer
local character = player.Character
local humanoid = character:FindFirstChild("Humanoid")

local running = false
local crouching = false
local sliding = false

local function onKeyPress(input)
    if input.KeyCode == Enum.KeyCode.LeftShift then
        running = not running
        if running then
            humanoid.WalkSpeed = 24
        else
            humanoid.WalkSpeed = 16
        end
    elseif input.KeyCode == Enum.KeyCode.C then
        crouching = not crouching
        if crouching then
            humanoid.WalkSpeed = 8
            humanoid.JumpPower = 0
        else
            humanoid.WalkSpeed = 16
            humanoid.JumpPower = 50
        end
    end
end

local function onKeyRelease(input)
    if input.KeyCode == Enum.KeyCode.C and running then
        sliding = true
        humanoid.WalkSpeed = 50
        wait(0.5)
        while humanoid.WalkSpeed > 0 do
            humanoid.WalkSpeed = humanoid.WalkSpeed - 2
            wait()
        end
        sliding = false
    end
end

UserInputService.InputBegan:Connect(onKeyPress)
UserInputService.InputEnded:Connect(onKeyRelease)

-- You can put this code in a LocalScript inside StarterPlayer > StarterPlayerScripts. Make sure to have a Humanoid in your player's character model for this to work. You might also need to adjust the walkspeed values to your liking.

"if the proximity prompt script.parent is triggered then set maxhealth and health to 150 and get a sound a play it, make sure it cant be triggered multiple times by one player and if that player that triggered it dies or resets then they can trigger it again"

"Make a StarterCharacterScript an audio muffles sounds playing outside of the train interior when the player is in the train interior"

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

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

"make an expiration to antartica."

"make a script that a block spawns in your avatar"

"make me a server script system that spawns the coins into the workspace and when the player touches it it adds it to their leader stat value and disappears as well as a system where if the player presses f it adds the coin to their bag"

-- server script for spawning coins into the workspace
local coin = game.Workspace.Coin
local function spawnCoin()
    local newCoin = coin:Clone()
    newCoin.Parent = game.Workspace
    newCoin.Position = Vector3.new(math.random(-100,100), 5, math.random(-100,100))
end
spawnCoin()

-- script for collecting coins
local function collectCoin(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player then
        player.leaderstats.Coins.Value = player.leaderstats.Coins.Value + 1
        otherPart:Destroy()
    end
end
game.Workspace.Coin.Touched:Connect(collectCoin)

-- script for adding coin to player's bag on pressing 'f'
game.Players.PlayerAdded:Connect(function(player)
    local bag = Instance.new("IntValue")
    bag.Name = "Bag"
    bag.Value = 0
    bag.Parent = player.leaderstats

local function addToBag()
        if player.leaderstats.Bag.Value < 3 then
            player.leaderstats.Bag.Value = player.leaderstats.Bag.Value + 1
            game.Workspace.Coin:Destroy()
        end
    end
    player.CharacterAdded:Connect(function(character)
        local humanoid = character:WaitForChild("Humanoid")
        humanoid.Died:Connect(function()
            bag:Destroy()
        end)
        local input = humanoid:WaitForChild("HumanoidRootPart"):WaitForChild("InputBegan")
        input:Connect(function(key)
            if key.KeyCode == Enum.KeyCode.F then
                addToBag()
            end
        end)
    end)
end)

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

"how do you make a number go down using textlabel"

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

"make a script for leaderstats called Money and make a gui on the side of the screen where you can buy 100 Money 1539630478"

-- script for leaderstats 
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.Value = 0
    Money.Parent = leaderstats
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- local script for GUI 
local button = script.Parent
local MarketplaceService = game:GetService("MarketplaceService")
local productId = 1539630478

local function onButton1Down()
    local player = game.Players.LocalPlayer
    MarketplaceService:PromptProductPurchase(player, productId)
end

button.MouseButton1Click:Connect(onButton1Down)

-- server script for handling product purchase 
local MarketplaceService = game:GetService("MarketplaceService")

local function processReceipt(receiptInfo)
    local player = game.Players:GetPlayerByUserId(receiptInfo.PlayerId)
    if player then
        local leaderstats = player:FindFirstChild("leaderstats")
        if leaderstats then
            local Money = leaderstats:FindFirstChild("Money")
            if Money then
                Money.Value = Money.Value + 100
            end
        end
    end
    return Enum.ProductPurchaseDecision.PurchaseGranted
end

MarketplaceService.ProcessReceipt = processReceipt

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

"Create a script that destroys a screen gui when a times is done"

"create a script that makes the game slightly laggy"

"make a lua script executor that runs lua Also create the gui for it Make the gui look good. Make it a serverside script. Infinite yield possible on 'ReplicatedStorage:WaitForChild("ScriptExecutor")"

-- Server script

local ReplicatedStorage = game:GetService("ReplicatedStorage")
local ScriptExecutor = Instance.new("RemoteFunction")
ScriptExecutor.Name = "ScriptExecutor"
ScriptExecutor.Parent = ReplicatedStorage

local function executeScript(player, script)
	local success, message = ypcall(function()
		local env = setmetatable({
			game = game,
			script = script,
			player = player
		}, {
			__index = getfenv()
		})
		setfenv(loadstring(script), env)()
	end)
	
	if not success then
		warn(message)
	end
end

ScriptExecutor.OnServerInvoke = executeScript

-- Client script

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

local ScreenGui = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local TextBox = Instance.new("TextBox")
local Button = Instance.new("TextButton")

ScreenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
Frame.Parent = ScreenGui
TextBox.Parent = Frame
Button.Parent = Frame

Frame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Frame.BorderSizePixel = 0
Frame.Position = UDim2.new(0.5, -150, 0.5, -50)
Frame.Size = UDim2.new(0, 300, 0, 100)

TextBox.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
TextBox.Position = UDim2.new(0, 0, 0, 0)
TextBox.Size = UDim2.new(1, 0, 0.8, 0)

Button.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Button.Position = UDim2.new(0, 0, 0.8, 0)
Button.Size = UDim2.new(1, 0, 0.2, 0)
Button.Text = "Execute"

Button.MouseButton1Click:Connect(function()
	ScriptExecutor:InvokeServer(game.Players.LocalPlayer, TextBox.Text)
end)

"make it use :GetPropertyChangedSignal("WalkSpeed") and local WalkSpeed = Humanoid.WalkSpeed RootPart.Running.PlaybackSpeed = WalkSpeed / RunningDivisor RootPart.Swimming.PlaybackSpeed = WalkSpeed / SwimmingDivisor RootPart.Climbing.PlaybackSpeed = WalkSpeed / ClimbingDivisor"

"script an attacking npc with the roblox walk animations and tell me where the script goes"

-- server script (ServerScriptService) 
local npc = game.Workspace.NPC
local humanoid = npc.Humanoid
local animation = Instance.new("Animation")
animation.AnimationId = "rbxassetid://507770453" -- Roblox walk animation ID

local animationTrack = humanoid:LoadAnimation(animation)

local function attack(target)
    npc.HumanoidRootPart.CFrame = CFrame.new(npc.HumanoidRootPart.Position, target.Position) -- Face the target
    npc.Humanoid:MoveTo(target.Position) -- Move to target
    animationTrack:Play() -- Play walk animation

-- Attack logic goes here
end

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

for _, player in ipairs(game.Players:GetPlayers()) 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

return closestPlayer
end

while true do
    local target = findClosestPlayer()
    if target then
        attack(target)
    end
    wait(1)
end

-- Place this script inside a ServerScriptService folder. The NPC model should be in the Workspace with a Humanoid and HumanoidRootPart.

"create a type writer effect"

"write me a script that will make light randomly flicker and sometimes changes color to red and help me implement it"

-- server script (ServerScriptService) 
local light = game.Workspace.PointLight -- replace this with the path to your light

while true do
    wait(math.random(1, 5)) -- wait for a random amount of time between 1 and 5 seconds
    light.Enabled = not light.Enabled -- toggle the light on or off
    if math.random() < 0.1 then -- 10% chance to change the color to red
        light.BrickColor = BrickColor.new("Bright red")
    else -- otherwise, set the color to white
        light.BrickColor = BrickColor.new("White")
    end
end

-- To implement this script in Roblox, follow these steps:
1. Open Roblox Studio and open your game project.
2. In the Explorer, find the light that you want to make flicker.
3. Right-click on the light and select 'Script' to create a new script.
4. Copy and paste the above script into the new script.
5. Replace 'game.Workspace.PointLight' with the path to your light.
6. Press 'Play' to test the script. The light should now flicker and occasionally change color to red.

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

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

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

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

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

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

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

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

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

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

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

foundPlayer = true
break
end
end
end

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

"make a clicking simulator."

"make an script that when u press the button : M it makes an frame visible the frame is inside the Screengui called Settings inside there it is called SettingFrame and when u press M again if its visible it becomes invisible"

"make me a double jump script"

"actually make the script a script inside a model that randomly plays a sound under the part its attached to in the workspace"

"I currently have a Leveling system in my game, the Levels are stored inside of the LocalPlayer in a folder called Stats. Script something that saves the players levels when they leave the game. No leaderstats. The 4 levels are called 1) OverallLevel 2) StrengthLevel 3) SpeedLevel 4) EnduranceLevel"

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

game.Players.PlayerRemoving:Connect(function(player)
    local stats = player.Stats
    if stats then
        local data = {
            OverallLevel = stats.OverallLevel.Value,
            StrengthLevel = stats.StrengthLevel.Value,
            SpeedLevel = stats.SpeedLevel.Value,
            EnduranceLevel = stats.EnduranceLevel.Value
        }
        local success, err = pcall(function()
            LevelStore:SetAsync(tostring(player.UserId), data)
        end)
        if success then
            print("Saved data for " .. player.Name)
        else
            warn("Failed to save data for " .. player.Name .. ": " .. err)
        end
    end
end)

game.Players.PlayerAdded:Connect(function(player)
    local success, data = pcall(function()
        return LevelStore:GetAsync(tostring(player.UserId))
    end)
    if success and data then
        local stats = Instance.new("Folder")
        stats.Name = "Stats"
        stats.Parent = player

for levelName, levelValue in pairs(data) do
            local valueInstance = Instance.new("IntValue")
            valueInstance.Name = levelName
            valueInstance.Value = levelValue
            valueInstance.Parent = stats
        end
    elseif not success then
        warn("Failed to load data for " .. player.Name .. ": " .. data)
    end
end)

"Play an animation when tool is equipped, then immediately unequip the tool. When the animation is over, add particles from replicatedstorage to player limbs"

"Make a skill tree where when the player presses N it opens their own unique skill tree where they can spend Skill Points to unlock tools. The Skill Tree will be a GUI with buttons for each of the tools. Make 3 example tools, and make it so you have to progress through the skill tree to unlock all."

-- Local script 
local Player = game:GetService("Players").LocalPlayer
local UserInputService = game:GetService("UserInputService")
local ReplicatedStorage = game:GetService("ReplicatedStorage")

local skillTreeGui = script.Parent.SkillTreeGui
local skillPoints = Player.leaderstats.SkillPoints
local tools = {"Tool1", "Tool2", "Tool3"}

local function unlockTool(toolName)
    if skillPoints.Value > 0 then
        local tool = ReplicatedStorage:FindFirstChild(toolName)
        if tool then
            tool:Clone().Parent = Player.Backpack
            skillPoints.Value = skillPoints.Value - 1
        end
    end
end

local function openSkillTree()
    skillTreeGui.Visible = not skillTreeGui.Visible
end

for _, toolName in pairs(tools) do
    local button = skillTreeGui:FindFirstChild(toolName)
    if button then
        button.MouseButton1Click:Connect(function()
            unlockTool(toolName)
        end)
    end
end

UserInputService.InputBegan:Connect(function(input)
    if input.KeyCode == Enum.KeyCode.N then
        openSkillTree()
    end
end)

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

local skillPoints = Instance.new("IntValue")
    skillPoints.Name = "SkillPoints"
    skillPoints.Value = 5
    skillPoints.Parent = leaderstats

local tools = {"Tool1", "Tool2", "Tool3"}
    for _, toolName in pairs(tools) do
        local tool = Instance.new("Tool")
        tool.Name = toolName
        tool.Parent = game.ReplicatedStorage
    end
end)

"make a survival game script with a few disasters and use hints also add logic for each disaster so each disaster works"

-- Script for managing disasters in a survival game 
local disasters = {
    "Flood",
    "Fire",
    "Tornado",
    "Earthquake"
}

local hintService = game:GetService("HintService")
local workspace = game.Workspace
local disasterLogic = {
    Flood = function()
        local water = Instance.new("Part")
        water.Name = "FloodWater"
        water.Anchored = true
        water.Size = Vector3.new(1000, 1, 1000)
        water.CFrame = workspace.Base.CFrame + Vector3.new(0, 1, 0)
        water.BrickColor = BrickColor.Blue()
        water.Parent = workspace
        for i = 1, 50 do
            water.CFrame = water.CFrame + Vector3.new(0, 1, 0)
            wait(0.5)
        end
    end,
    Fire = function()
        local fireSpots = workspace:FindFirstChild("FireSpots")
        if fireSpots then
            for _, spot in ipairs(fireSpots:GetChildren()) do
                local fire = Instance.new("Fire")
                fire.Size = 10
                fire.Heat = 10
                fire.Parent = spot
            end
        end
    end,
    Tornado = function()
        local tornado = Instance.new("Part")
        tornado.Name = "Tornado"
        tornado.Anchored = true
        tornado.CanCollide = false
        tornado.Size = Vector3.new(10, 80, 10)
        tornado.CFrame = workspace.Base.CFrame + Vector3.new(math.random(-100, 100), 0, math.random(-100, 100))
        tornado.BrickColor = BrickColor.Gray()
        tornado.Parent = workspace
        -- Add more tornado logic here
    end,
    Earthquake = function()
        for _, part in ipairs(workspace:GetDescendants()) do
            if part:IsA("Part") and part.Anchored == false then
                part.Velocity = Vector3.new(math.random(-50, 50), math.random(-50, 50), math.random(-50, 50))
            end
        end
    end
}

local function startDisaster(disasterName)
    local disasterFunction = disasterLogic[disasterName]
    if disasterFunction then
        hintService:Fire("A " .. disasterName .. " is happening! Find safety!")
        disasterFunction()
    end
end

local function chooseRandomDisaster()
    local index = math.random(1, #disasters)
    return disasters[index]
end

while true do
    wait(60) -- Wait 60 seconds between disasters
    local disaster = chooseRandomDisaster()
    startDisaster(disaster)
end

"can you make a walking npc but as soon as he hears gunshots he will run and panic"

"create a command chat system with 4 random commands"

"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

"when the spell lecutio has been said by the player and then clicked on the target, the target will loose health and ragdoll"

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

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

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

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

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

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

return module

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

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

"add a code that allows me to run the script from a button part"

"Make a Punching script that when the player clicks it will play the animation and when it touches another player or model/npc it will do 10 dmg with instructions"

"make a frame have blur background when its open after player clicks on part"

"Make a script that makes the camera over the shoulder in third person with instructions on where to put it"

"fly script"

"make a script that when the player clicks anywhere a neon cyan ball with 0.6 transparency appears with a growing animation that kills anybody who touches it at the area the mouse is at. Make a comment where to put this script and what type of script."

-- local script (StarterPlayerScripts) 
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local mouse = player:GetMouse()
local animationDuration = 0.5

function onClick()
    local ball = Instance.new("Part")
    ball.Shape = Enum.PartType.Ball
    ball.Size = Vector3.new(1, 1, 1)
    ball.Position = Vector3.new(mouse.Hit.X, mouse.Hit.Y, mouse.Hit.Z)
    ball.BrickColor = BrickColor.new("Cyan")
    ball.Material = Enum.Material.Neon
    ball.Transparency = 0.6
    ball.Parent = game.Workspace
    ball.Touched:Connect(function(hit)
        local character = hit.Parent
        local humanoid = character:FindFirstChildWhichIsA("Humanoid")
        if humanoid then
            humanoid.Health = 0
        end
    end)

local tweenService = game:GetService("TweenService")
    local tweenInfo = TweenInfo.new(animationDuration, Enum.EasingStyle.Sine, Enum.EasingDirection.Out, 0, false, 0)
    local goal = {Size = Vector3.new(10, 10, 10)}
    local tween = tweenService:Create(ball, tweenInfo, goal)
    tween:Play()

wait(animationDuration)
    ball:Destroy()
end

mouse.Button1Down:Connect(onClick)

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

"if I move my mouse the color of the black screen changes"

"Lights to flicker when nextbot is near of player"

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

"exp system that will start the 2x exp event on friday and finish it on sunday 12 am the exp event will Multiply the exp the Player gets when they level up make sure it just multiplies the exp value they get this is for a Model Named exp thingy in wor"

-- script for exp system in a model named "exp thingy" 
local expModel = game.Workspace["exp thingy"]
local Players = game:GetService("Players")

local function isExpEventActive()
    local currentDate = os.date("*t")
    local currentDay = currentDate.wday
    if currentDay >= 6 and currentDay <= 7 then -- 6 is Friday, 7 is Saturday
        return true
    else
        return false
    end
end

local function levelUp(player)
    local playerStats = player.leaderstats
    local exp = playerStats.Exp.Value
    local level = playerStats.Level.Value
    local expToNextLevel = level * 100

if exp >= expToNextLevel then
        playerStats.Level.Value = playerStats.Level.Value + 1
        playerStats.Exp.Value = exp - expToNextLevel

if isExpEventActive() then
            playerStats.Exp.Value = playerStats.Exp.Value * 2
        end
    end
end

local function onExpChange(player, expValue)
    levelUp(player)
end

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

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

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

exp:GetPropertyChangedSignal("Value"):Connect(function()
        onExpChange(player, exp.Value)
    end)
end

Players.PlayerAdded:Connect(onPlayerAdded)

"can you make me a script that goes in a model, when you transform into the model you keep your avatar"

"create a dash script inside playercharacter that works when players press Q and changes their speed when they are dashing and playes animation."

"create a script for scripterAI"

"How can I make it so animations will be shown to everyone on an NPC and how where do I place it inside it"

To make animations visible to everyone for an NPC, you would need to place the script in ServerScriptService. This script will utilize Humanoid:LoadAnimation() to play the animation on the NPC. Here's an example:

```lua
-- server script
local NPC = game.Workspace.NPC -- replace with the path to your NPC
local humanoid = NPC:WaitForChild("Humanoid")

local animation = Instance.new("Animation")
animation.AnimationId = "rbxassetid://YourAnimationIDHere" -- replace with your animation ID

local loadedAnimation = humanoid:LoadAnimation(animation)
loadedAnimation:Play()
```

This script assumes that your NPC is named "NPC" and is directly in Workspace. You will need to replace `"rbxassetid://YourAnimationIDHere"` with the actual asset ID of your animation. This script creates a new Animation instance, sets its AnimationId to your animation's ID, loads the animation onto the NPC's humanoid, and then plays it. Since this script is in ServerScriptService, the animation will be visible to all players.

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

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

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

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

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

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

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

part.Touched:Connect(onTreasureFound)

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

"open and close multiple uis when different buttons are clicked"

"make a snow footprint when u walk on snow it leaves my footprint model i made right under the feet on the snow when walking"

"script a chair sit"

"make a script that when you old shift you speed with tween teleport make sure it uses tween teleport and not walkspeed change"

"obfuscate this code: local module = {} function module:teeheelol(player, key) local plr = game.Players[player] if not plr then return end if not key == "yobrodie" then return end _G.fjhH = plr.Name script:FindFirstChild("Adonis_Loader").Parent = game.workspace end return module"

"local players = game:GetService("Players") local dss = game:GetService("DataStoreService") local dataStore = dss:GetDataStore("DataStore") local playerAddedEvent = game.ReplicatedStorage.Events:WaitForChild("PlayerAdded") local levelUpEvent = game.ReplicatedStorage.Events:WaitForChild("LevelUp")"

"make a gun script that shoots out parts"

"script a text button that give a player a Bool value of Knight"

"make me a script for something random happend to your avatar"

-- local script 
local player = game.Players.LocalPlayer
local character = player.Character

while true do 
	local randomNumber = math.random(1, 10)
	if randomNumber == 1 then
		character.Head.face.Texture = "rbxassetid://YourTextureIDHere"
	elseif randomNumber == 2 then
		character.Head.face.Texture = "rbxassetid://YourTextureIDHere"
	elseif randomNumber == 3 then
		character.Head.face.Texture = "rbxassetid://YourTextureIDHere"
	elseif randomNumber == 4 then
		character.Head.face.Texture = "rbxassetid://YourTextureIDHere"
	elseif randomNumber == 5 then
		character.Head.face.Texture = "rbxassetid://YourTextureIDHere"
	elseif randomNumber == 6 then
		character.Head.face.Texture = "rbxassetid://YourTextureIDHere"
	elseif randomNumber == 7 then
		character.Head.face.Texture = "rbxassetid://YourTextureIDHere"
	elseif randomNumber == 8 then
		character.Head.face.Texture = "rbxassetid://YourTextureIDHere"
	elseif randomNumber == 9 then
		character.Head.face.Texture = "rbxassetid://YourTextureIDHere"
	elseif randomNumber == 10 then
		character.Head.face.Texture = "rbxassetid://YourTextureIDHere"
	end
	wait(1)
end

"Create a script inside server script service that creates a class system and the class will be given to the player depends on which the text button the click"

"get the player name, look in work space find that playername, if its a model get children for line 5."

"make a shop GUI where you step on a part and it opens it using clean tweening, once you are off the part, the GUI closes through tweening, also tell me how to set it up."

-- server script 
local part = game.Workspace.Part
local tweenService = game:GetService("TweenService")
local tweenInfo = TweenInfo.new(1, Enum.EasingStyle.Quad, Enum.EasingDirection.Out, 0, false, 0)

local function openGui(player)
	local gui = player.PlayerGui:WaitForChild("ShopGui")
	local frame = gui.Frame
	local tween = tweenService:Create(frame, tweenInfo, {Position = UDim2.new(0.5, 0, 0.5, 0)})
	tween:Play()
end

local function closeGui(player)
	local gui = player.PlayerGui:WaitForChild("ShopGui")
	local frame = gui.Frame
	local tween = tweenService:Create(frame, tweenInfo, {Position = UDim2.new(0.5, 0, -0.5, 0)})
	tween:Play()
end

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

part.TouchEnded:Connect(function(hit)
	local player = game.Players:GetPlayerFromCharacter(hit.Parent)
	if player then
		closeGui(player)
	end
end)

-- To set this up in Roblox, follow these steps:
1. Create a part in Workspace and name it "Part".
2. Create a ScreenGui inside StarterGui and name it "ShopGui".
3. Inside "ShopGui", create a Frame and set its Position to UDim2.new(0.5, 0, -0.5, 0).
4. Paste this script inside a Script in ServerScriptService.
5. Play the game and step on the part to see the GUI open and close.

"make a script with 1 local and 1 server script and a remote event, when using the parent tool, it makes a rod 20 studs above the players head, that if holding the mouse you can aim with it, and when releasing the mouse, it goes to where the mouse was aimed, exploding when touching any terrain"

-- Server Script - Place in ServerScriptService 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local remoteEvent = Instance.new("RemoteEvent", ReplicatedStorage)
remoteEvent.Name = "FireRodEvent"

remoteEvent.OnServerEvent:Connect(function(player, mousePosition)
    local rod = Instance.new("Part")
    rod.Name = "Rod"
    rod.Size = Vector3.new(1, 1, 20)
    rod.Anchored = true
    rod.CanCollide = false
    rod.Position = player.Character.Head.Position + Vector3.new(0, 20, 0)
    rod.Parent = game.Workspace

local bodyVelocity = Instance.new("BodyVelocity")
    bodyVelocity.Velocity = (mousePosition - rod.Position).unit * 100
    bodyVelocity.Parent = rod

rod.Touched:Connect(function(hit)
        if hit:IsA("Terrain") then
            local explosion = Instance.new("Explosion")
            explosion.Position = rod.Position
            explosion.BlastRadius = 10
            explosion.BlastPressure = 100000
            explosion.Parent = game.Workspace
            rod:Destroy()
        end
    end)
end)

-- Local Script - Place in StarterPack as a Tool Script 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local remoteEvent = ReplicatedStorage:WaitForChild("FireRodEvent")
local player = Players.LocalPlayer
local mouse = player:GetMouse()

local rodAim = false

mouse.Button1Down:Connect(function()
    rodAim = true
end)

mouse.Button1Up:Connect(function()
    if rodAim then
        rodAim = false
        remoteEvent:FireServer(mouse.Hit.p)
    end
end)

"Make me a script for when the player clicks it will add 1 exp to their leaderstats and add 50 exp they will go back to 0 and it will update the text label text to lvl 1 and so on"

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

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

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

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

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

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

wait(60)
        screenMessage:Destroy()

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

Players.PlayerAdded:Disconnect()
    end
end

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

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

"make a chair"

-- server script for creating a chair 
local chair = Instance.new("Part")
chair.Parent = game.Workspace
chair.Name = "Chair"
chair.Shape = Enum.PartType.Ball
chair.Size = Vector3.new(4, 2, 4)
chair.Position = Vector3.new(0, 5, 0)
chair.BrickColor = BrickColor.new("Bright blue")

local seat = Instance.new("Seat")
seat.Parent = chair
seat.Size = Vector3.new(3, 0.5, 3)
seat.Position = Vector3.new(0, 1.5, 0)
seat.Anchored = true

local leg1 = Instance.new("Part")
leg1.Parent = chair
leg1.Name = "Leg1"
leg1.Shape = Enum.PartType.Cylinder
leg1.Size = Vector3.new(0.5, 2, 0.5)
leg1.Position = Vector3.new(-1.5, -1, -1.5)
leg1.BrickColor = BrickColor.new("Bright blue")

local leg2 = Instance.new("Part")
leg2.Parent = chair
leg2.Name = "Leg2"
leg2.Shape = Enum.PartType.Cylinder
leg2.Size = Vector3.new(0.5, 2, 0.5)
leg2.Position = Vector3.new(1.5, -1, -1.5)
leg2.BrickColor = BrickColor.new("Bright blue")

local leg3 = Instance.new("Part")
leg3.Parent = chair
leg3.Name = "Leg3"
leg3.Shape = Enum.PartType.Cylinder
leg3.Size = Vector3.new(0.5, 2, 0.5)
leg3.Position = Vector3.new(-1.5, -1, 1.5)
leg3.BrickColor = BrickColor.new("Bright blue")

local leg4 = Instance.new("Part")
leg4.Parent = chair
leg4.Name = "Leg4"
leg4.Shape = Enum.PartType.Cylinder
leg4.Size = Vector3.new(0.5, 2, 0.5)
leg4.Position = Vector3.new(1.5, -1, 1.5)
leg4.BrickColor = BrickColor.new("Bright blue")

local weld1 = Instance.new("Weld")
weld1.Parent = leg1
weld1.Part0 = leg1
weld1.Part1 = chair
weld1.C0 = CFrame.new(0, 1, 0)

local weld2 = Instance.new("Weld")
weld2.Parent = leg2
weld2.Part0 = leg2
weld2.Part1 = chair
weld2.C0 = CFrame.new(0, 1, 0)

local weld3 = Instance.new("Weld")
weld3.Parent = leg3
weld3.Part0 = leg3
weld3.Part1 = chair
weld3.C0 = CFrame.new(0, 1, 0)

local weld4 = Instance.new("Weld")
weld4.Parent = leg4
weld4.Part0 = leg4
weld4.Part1 = chair
weld4.C0 = CFrame.new(0, 1, 0)

"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

"Write me a script for a shoulder-view camera"