Haddock - Roblox Library

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

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

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

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

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

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

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

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

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

"Make a code that if X is clicked on your keyboard then go in the localplayer playergui and if there is a GUI named Gunsmith_GUI then destroy it, else if it isnt there then dont do nothing"

"Create a system where when the player presses the E key, he creates a clone of his character, this clone will appear next to the player. Clones chase and kill players, except the owner of the action.Clones limit 3, duration of clones 15 seconds."

-- LocalScript in StarterPlayerScripts 
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local cloneCount = 0
local cloneLimit = 3
local cloneDuration = 15

local function createClone()
    if cloneCount < cloneLimit then
        cloneCount = cloneCount + 1
        local clone = character:Clone()
        clone.Parent = game.Workspace
        clone.HumanoidRootPart.CFrame = character.HumanoidRootPart.CFrame * CFrame.new(5, 0, 0)
        clone.Humanoid.DisplayName = "Clone"
        
        local aiScript = Instance.new("Script", clone)
        aiScript.Source = [[
local clone = script.Parent
local target = game.Workspace:FindFirstChild("]]..player.Name..[[")

while true do
    if target then
        local distance = (clone.HumanoidRootPart.Position - target.HumanoidRootPart.Position).Magnitude
        if distance > 5 then
            clone.Humanoid:MoveTo(target.HumanoidRootPart.Position)
        else
            clone.Humanoid:Attack()
        end
    end
    wait()
end
]]
        wait(cloneDuration)
        clone:Destroy()
        cloneCount = cloneCount - 1
    end
end

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

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

"clickable part located in workspace that gives a player 1 random tool with a string value called common form a folder called ToolsFolder inside serverstorage"

"Make me a shop system where if the player has a certain amount of Rebirth boost bought it increases the amount of rebirths they get everytime they click the rebirth button"

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

local function onRebirthButtonClick()
    local player = playerService.LocalPlayer
    local rebirths = player.leaderstats.Rebirths.Value
    local rebirthBoosts = player.leaderstats.RebirthBoosts.Value

player.leaderstats.Rebirths.Value = rebirths + (1 + rebirthBoosts)
end

button.MouseButton1Click:Connect(onRebirthButtonClick)

-- script for shop system (assuming you have a shop GUI and a buy button) 
local buyButton = script.Parent
local playerService = game:GetService("Players")

local function onBuyButtonClick()
    local player = playerService.LocalPlayer
    local coins = player.leaderstats.Coins.Value
    local rebirthBoostCost = 1000 -- change this to the cost of the rebirth boost

if coins >= rebirthBoostCost then
        player.leaderstats.Coins.Value = coins - rebirthBoostCost
        player.leaderstats.RebirthBoosts.Value = player.leaderstats.RebirthBoosts.Value + 1
    end
end

buyButton.MouseButton1Click:Connect(onBuyButtonClick)

"can you make me a tool that has a moveset of 3 abilities. When you press e, the ball moves foward. When you press r, the ball goes straight then curves left. When you press t, the ball goes straight then curves right."

-- local script 
local UserInputService = game:GetService("UserInputService")
local tool = script.Parent
local ball = tool.Ball
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")

tool.Activated:Connect(function()
    ball.Velocity = humanoid.RootPart.CFrame.lookVector * 50
end)

UserInputService.InputBegan:Connect(function(input)
    if input.KeyCode == Enum.KeyCode.E then
        ball.Velocity = humanoid.RootPart.CFrame.lookVector * 50
    elseif input.KeyCode == Enum.KeyCode.R then
        ball.Velocity = humanoid.RootPart.CFrame.lookVector * 50
        wait(1)
        ball.Velocity = humanoid.RootPart.CFrame * CFrame.Angles(0, math.rad(90), 0) * Vector3.new(0, 0, 50)
    elseif input.KeyCode == Enum.KeyCode.T then
        ball.Velocity = humanoid.RootPart.CFrame.lookVector * 50
        wait(1)
        ball.Velocity = humanoid.RootPart.CFrame * CFrame.Angles(0, math.rad(-90), 0) * Vector3.new(0, 0, 50)
    end
end)

"make a script when user clicks it shoots fire balls"

"add lighting to part on touch"

"e key for passing the ball Starter Gui"

"if the player's stage value is between 106 and 209, make the player teleport slightly above the part in the Checkpoints folder that shares the same name as their Stage value when they touch the parent part. slow down player velocity on teleport"

"make imagelabel1 show a specific image if the player has the badge with the id 2143148840, if they don't the badge then show image 12953850111. repeat for multiple imagelabels with different badges"

"when i press I on my keyboard i will sit"

"light up a part"

"If Harlandroblox says !game1 then my Part in ReplicatedStorage called highhh will come out and then there will be a timer for 5 seconds at the top of the screen then when the timer is finished then my Part called gam its transparency will change to 0 and if you step on it then you get kicked and it will say To slow and then after 10 seconds it will go back to normal"

-- local script (StarterGUI) 
local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local highhh = ReplicatedStorage:WaitForChild("highhh")
local gam = ReplicatedStorage:WaitForChild("gam")

local function onChat(player, message)
    if message == "!game1" then
        local clonedHighhh = highhh:Clone()
        clonedHighhh.Parent = workspace

local timerGui = Instance.new("TextLabel", player.PlayerGui)
        timerGui.Text = "5"
        timerGui.TextColor3 = Color3.fromRGB(255, 255, 255)
        timerGui.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
        timerGui.Size = UDim2.new(0, 100, 0, 50)
        timerGui.Position = UDim2.new(0.5, -50, 0, 0)

for i = 5, 1, -1 do
            timerGui.Text = tostring(i)
            wait(1)
        end

timerGui:Destroy()
        clonedHighhh:Destroy()

gam.Transparency = 0

local function onTouched(hit)
            local player = Players:GetPlayerFromCharacter(hit.Parent)
            if player then
                player:Kick("Too slow")
            end
        end

gam.Touched:Connect(onTouched)

wait(10)

gam.Transparency = 1
        gam.Touched:Disconnect(onTouched)
    end
end

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

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

"when left click is clicked activate remote event"

"create code for 2 seperate scripts an Input Manager to detect when a Player Clicks using M1 and Fires a Local Scipt Under it by Invoking a BindaBle Function when the player clicks"

To achieve the functionality described, you'll need two scripts: a LocalScript for detecting mouse clicks (M1) and a Script for handling the action when the click occurs. Here's how you can set it up:

### Script 1: Input Manager (LocalScript)
This LocalScript will detect when the player clicks their mouse and then invoke a BindableFunction to handle the action. This script should be placed in a LocalScript within the player's PlayerScripts or a GUI.

```lua
-- LocalScript to detect mouse clicks and invoke a BindableFunction
local player = game.Players.LocalPlayer
local mouse = player:GetMouse()
local bindableFunction = game.ReplicatedStorage:WaitForChild("OnClickFunction") -- Assuming the BindableFunction is stored in ReplicatedStorage

mouse.Button1Down:Connect(function()
    bindableFunction:Invoke() -- Invokes the BindableFunction
end)
```

### Script 2: Action Handler (Script)
This Script will be connected to the BindableFunction and will perform the desired action when the function is invoked. This script should be placed in a Script within ServerScriptService or Workspace.

```lua
-- Script to handle the action when the BindableFunction is invoked
local bindableFunction = Instance.new("BindableFunction", game.ReplicatedStorage)
bindableFunction.Name = "OnClickFunction"

bindableFunction.OnInvoke = function()
    -- Code to execute when the player clicks M1
    print("Player clicked M1!") -- Example action
    -- Add any additional actions you want to perform here
end
```

This setup ensures that when a player clicks their mouse (M1), the LocalScript detects this action and invokes a BindableFunction. The Script connected to the BindableFunction then performs whatever actions are defined within it. This method is useful for separating client-side detection of inputs and server-side actions, adhering to Roblox's security model that restricts certain actions to the server.

"make a script where if someone with vc say's "/join vc" in the chat it teleport's them to game, game id "10449761463""

"Make a roblox script where my Part called leee will show the top 20 players with the most of my leaderstat called Robux use my part called leee it updates each 2 second make the guis on my part called leee"

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

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

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

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

humanoid.WalkSpeed = walkSpeed
humanoid.JumpPower = jumpPower

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

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

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

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

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

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

"Can we improve this script by making the camera zoom directly to the camerapart when the player presses Z?"

-- Yes, we can improve the script by removing the while loop that gradually changes the camera's field of view and instead directly set the camera's field of view to the desired value. We can also directly set the camera's position to the camera part's position when zooming in.

-- Local script 
local player = game.Players.LocalPlayer
local UserInputService = game:GetService("UserInputService")
local camera = workspace.CurrentCamera
local zoomedIn = false
local defaultFieldOfView = 70
local zoomedFieldOfView = 20
local zoomOffset = Vector3.new(0, 3.5, 0) -- this is the offset value when zoomed in

-- Create an invisible part for the camera to follow
local cameraPart = Instance.new("Part")
cameraPart.Transparency = 1
cameraPart.CanCollide = false
cameraPart.Anchored = true
cameraPart.Parent = workspace

-- Wait for the player's character to load
local character = player.CharacterAdded:Wait()
-- Wait for the HumanoidRootPart to load
local humanoidRootPart = character:WaitForChild("HumanoidRootPart")

-- Set the initial position of the camera part
cameraPart.Position = humanoidRootPart.Position + zoomOffset

UserInputService.InputBegan:Connect(function(input)
	if input.KeyCode == Enum.KeyCode.Z then
		if zoomedIn then
			camera.FieldOfView = defaultFieldOfView
			camera.CameraSubject = character.Humanoid -- set the camera to follow the player
			zoomedIn = false
		else
			camera.FieldOfView = zoomedFieldOfView
			cameraPart.Position = humanoidRootPart.Position + zoomOffset
			cameraPart.CFrame = CFrame.new(cameraPart.Position, humanoidRootPart.Position) -- make the camera part look at the player
			camera.CameraSubject = cameraPart -- set the camera to follow the camera part
			zoomedIn = true
		end
	end
end)

"Make me a roblox football script where my camera angle sets the perfect angle for the best dime. It determines the best perfect angle with the football power. I press the button g to active this script."

-- 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 football = game.Workspace.Football
local camera = workspace.CurrentCamera
local power = 50 -- adjust this value for the football power

local function setCameraAngle()
    local footballPosition = football.Position
    local characterPosition = character.HumanoidRootPart.Position
    local distance = (footballPosition - characterPosition).Magnitude
    local angle = math.atan((power^2 - math.sqrt(power^4 - 9.81*(9.81*distance^2 + 2*power^2*distance)))/(9.81*distance))
    camera.CFrame = CFrame.new(characterPosition, footballPosition) * CFrame.Angles(angle, 0, 0)
end

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

UserInputService.InputBegan:Connect(onInput)

"script a shop menu for my shop that has a close button and open button And items"

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

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

local openButton = Instance.new("TextButton", screenGui)
openButton.Text = "Open Shop"
openButton.TextColor3 = Color3.fromRGB(255, 255, 255)
openButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
openButton.Position = UDim2.new(0.5, 0, 0.9, 0)
openButton.AnchorPoint = Vector2.new(0.5, 0.5)
openButton.UICorner = 5

local closeButton = Instance.new("TextButton", shopMenu)
closeButton.Text = "Close"
closeButton.TextColor3 = Color3.fromRGB(255, 255, 255)
closeButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
closeButton.Position = UDim2.new(0.95, 0, 0.05, 0)
closeButton.AnchorPoint = Vector2.new(0.5, 0.5)
closeButton.UICorner = 5

local itemsList = Instance.new("ScrollingFrame", shopMenu)
itemsList.Size = UDim2.new(0.9, 0, 0.8, 0)
itemsList.Position = UDim2.new(0.05, 0, 0.1, 0)
itemsList.CanvasSize = UDim2.new(0, 0, 5, 0)

-- Add your shop items here in the itemsList ScrollingFrame

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

closeButton.MouseButton1Click:Connect(function()
    shopMenu.Visible = false
end)

"make an npc ai that makes that when the npc is behind a wall he cant see me but when im visible he sees me and start damaging me trough a far zone"

-- First, create a part named 'Wall' in the workspace. This is the wall that the NPC will not be able to see through. 
-- Second, create a part named 'Player' in the workspace. This is the player that the NPC will be trying to see. 
-- Third, create a part named 'NPC' in the workspace. This is the NPC that will be trying to see the player. 
-- Finally, add this script to the NPC.

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

local npc = Workspace.NPC
local player = Workspace.Player
local wall = Workspace.Wall

local function canSeePlayer()
	local ray = Ray.new(npc.Position, (player.Position - npc.Position).Unit * 50)
	local part, position = Workspace:FindPartOnRayWithIgnoreList(ray, {npc})

if part == player then
		return true
	else
		return false
	end
end

local function damagePlayer()
	if player:FindFirstChild("Humanoid") then
		player.Humanoid.Health = player.Humanoid.Health - 10
	end
end

RunService.Heartbeat:Connect(function()
	if canSeePlayer() then
		damagePlayer()
	end
end)

"Make me a Upgrade system with instructions on how to use"

To create an upgrade system, you will need to create a shop GUI where players can purchase upgrades using in-game currency. Here's an example script for a simple upgrade system:

-- server script for shop GUI 
local shopGui = game.Players.LocalPlayer.PlayerGui.ShopGui
local playerData = game.Players.LocalPlayer:WaitForChild("leaderstats")

local function purchaseUpgrade(upgradeName, upgradeCost)
    if playerData.Coins.Value >= upgradeCost then
        playerData.Coins.Value = playerData.Coins.Value - upgradeCost
        -- add upgrade to player's inventory or apply upgrade to player's character
    else
        -- display error message to player
    end
end

shopGui.UpgradeButton1.MouseButton1Click:Connect(function()
    purchaseUpgrade("Upgrade1", 100)
end)

shopGui.UpgradeButton2.MouseButton1Click:Connect(function()
    purchaseUpgrade("Upgrade2", 200)
end)

-- client script for displaying player's inventory 
local inventoryGui = game.Players.LocalPlayer.PlayerGui.InventoryGui
local playerData = game.Players.LocalPlayer:WaitForChild("leaderstats")

playerData.Bag.Changed:Connect(function(newBagValue)
    inventoryGui.InventoryText.Text = "Inventory: " .. newBagValue .. "/3"
end)

-- To use the upgrade system, players can open the shop GUI and click on the upgrade buttons to purchase upgrades. Upgrades can be applied to the player's character or added to the player's inventory. The player's inventory can be viewed by opening the inventory GUI.

"Make a Model of a chair from scratch"

-- local script 
-- Create the base part
local chairPart = Instance.new("Part")
chairPart.Name = "ChairPart"
chairPart.Size = Vector3.new(2, 0.2, 2)
chairPart.Anchored = true
chairPart.CanCollide = false
chairPart.Parent = workspace

-- Create the back part
local chairBack = Instance.new("Part")
chairBack.Name = "ChairBack"
chairBack.Size = Vector3.new(2, 0.2, 0.2)
chairBack.Anchored = true
chairBack.CanCollide = false
chairBack.Parent = workspace

-- Create the legs
local chairLeg1 = Instance.new("Part")
chairLeg1.Name = "ChairLeg1"
chairLeg1.Size = Vector3.new(0.2, 0.2, 0.2)
chairLeg1.Anchored = true
chairLeg1.CanCollide = false
chairLeg1.Parent = workspace

local chairLeg2 = Instance.new("Part")
chairLeg2.Name = "ChairLeg2"
chairLeg2.Size = Vector3.new(0.2, 0.2, 0.2)
chairLeg2.Anchored = true
chairLeg2.CanCollide = false
chairLeg2.Parent = workspace

local chairLeg3 = Instance.new("Part")
chairLeg3.Name = "ChairLeg3"
chairLeg3.Size = Vector3.new(0.2, 0.2, 0.2)
chairLeg3.Anchored = true
chairLeg3.CanCollide = false
chairLeg3.Parent = workspace

local chairLeg4 = Instance.new("Part")
chairLeg4.Name = "ChairLeg4"
chairLeg4.Size = Vector3.new(0.2, 0.2, 0.2)
chairLeg4.Anchored = true
chairLeg4.CanCollide = false
chairLeg4.Parent = workspace

-- Position the parts
chairPart.CFrame = CFrame.new(0, 0, 0)
chairBack.CFrame = CFrame.new(0, 0.1, 1)
chairLeg1.CFrame = CFrame.new(-0.9, -0.1, -0.9)
chairLeg2.CFrame = CFrame.new(0.9, -0.1, -0.9)
chairLeg3.CFrame = CFrame.new(-0.9, -0.1, 0.9)
chairLeg4.CFrame = CFrame.new(0.9, -0.1, 0.9)

-- Create the welds
local weld1 = Instance.new("Weld")
weld1.Parent = chairPart
weld1.Part0 = chairPart
weld1.Part1 = chairBack
weld1.C0 = CFrame.new(0, 0.1, -1)

local weld2 = Instance.new("Weld")
weld2.Parent = chairPart
weld2.Part0 = chairPart
weld2.Part1 = chairLeg1
weld2.C0 = CFrame.new(-1, -0.1, -1)

local weld3 = Instance.new("Weld")
weld3.Parent = chairPart
weld3.Part0 = chairPart
weld3.Part1 = chairLeg2
weld3.C0 = CFrame.new(1, -0.1, -1)

local weld4 = Instance.new("Weld")
weld4.Parent = chairPart
weld4.Part0 = chairPart
weld4.Part1 = chairLeg3
weld4.C0 = CFrame.new(-1, -0.1, 1)

local weld5 = Instance.new("Weld")
weld5.Parent = chairPart
weld5.Part0 = chairPart
weld5.Part1 = chairLeg4
weld5.C0 = CFrame.new(1, -0.1, 1)

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

"script something that makes a youtube video from a link."

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

"make me a keycard system for a hotel, provide me with instructions"

To create a keycard system for a hotel, you will need to follow these steps:

1. Create the keycard model.
2. Create a script for the keycard that assigns it to a specific room and player.
3. Create a script for the hotel room door that checks if the player has the correct keycard.
4. Create a system for distributing keycards to players.

Here's a basic implementation of each step:

Step 1: Create the keycard model
- In Roblox Studio, create a new part and name it "Keycard".
- Customize the appearance of the keycard as desired (color, size, etc.).

Step 2: Create a script for the keycard
- Insert a new script inside the keycard model and add the following code:

```lua
local keycard = script.Parent
keycard.RoomNumber = 1 -- Change this to the room number you want this keycard to unlock
```

Step 3: Create a script for the hotel room door
- Insert a new script inside the hotel room door model and add the following code:

```lua
local door = script.Parent
door.RoomNumber = 1 -- Change this to the room number this door belongs to
local unlocked = false

local function checkKeycard(player)
    for _, item in pairs(player.Backpack:GetChildren()) do
        if item.Name == "Keycard" and item.RoomNumber.Value == door.RoomNumber then
            unlocked = true
            break
        end
    end
    if unlocked then
        -- Open the door (e.g., change transparency, canCollide, etc.)
        door.Transparency = 0.5
        door.CanCollide = false
        wait(3) -- Wait for 3 seconds before closing the door
        door.Transparency = 0
        door.CanCollide = true
        unlocked = false
    end
end

door.Touched:Connect(checkKeycard)
```

Step 4: Create a system for distributing keycards to players
- This can be done in various ways, such as giving the keycard to the player when they spawn or having an NPC give the keycard to the player when they interact with it. Here's an example of giving the keycard to the player when they spawn:

```lua
local function giveKeycard(player)
    local keycard = game.ServerStorage.Keycard:Clone()
    keycard.RoomNumber.Value = 1 -- Change this to the room number you want to assign to the player
    keycard.Parent = player.Backpack
end

game.Players.PlayerAdded:Connect(giveKeycard)
```

Remember to place the keycard model inside the ServerStorage and customize the room numbers as needed.

"create a block script for something random happen to the block in every 1 second"

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

"make a npc script that moves to a random spot and able to jump and talk randomly along with not being able to fall off the map also make the npc have ai that can respond to other players and dont use comments"

Creating such a complex NPC would require a large amount of code and would be quite complex. However, I can provide you with a basic example of how you might start creating such an NPC.

```lua
local PathfindingService = game:GetService("PathfindingService")
local Players = game:GetService("Players")
local npc = script.Parent
local humanoid = npc.Humanoid
local rootPart = npc.HumanoidRootPart

local function moveToRandomLocation()
    local randomX = math.random(-500, 500)
    local randomZ = math.random(-500, 500)
    local targetPosition = Vector3.new(randomX, 0, randomZ)
    local path = PathfindingService:CreatePath()
    path:ComputeAsync(rootPart.Position, targetPosition)
    local waypoints = path:GetWaypoints()
    for _, waypoint in ipairs(waypoints) do
        humanoid:MoveTo(waypoint.Position)
        if waypoint.Action == Enum.PathWaypointAction.Jump then
            humanoid.Jump = true
        end
        humanoid.MoveToFinished:Wait()
    end
end

local function talkRandomly()
    local phrases = {"Hello!", "How are you?", "Nice weather we're having."}
    local randomPhrase = phrases[math.random(#phrases)]
    npc.Chat:Chat(npc.Head, randomPhrase, "SayMessage")
end

local function respondToPlayer(player)
    local phrases = {"Hi, " .. player.Name .. "!", "Nice to meet you, " .. player.Name .. "!", "How's it going, " .. player.Name .. "?"}
    local randomPhrase = phrases[math.random(#phrases)]
    npc.Chat:Chat(npc.Head, randomPhrase, "SayMessage")
end

Players.PlayerAdded:Connect(function(player)
    player.Chatted:Connect(function()
        respondToPlayer(player)
    end)
end)

while true do
    moveToRandomLocation()
    talkRandomly()
    wait(5)
end
```

This script will make the NPC move to a random location on the map, jump when necessary, and chat random phrases. The NPC will also respond to players when they chat. However, this script does not prevent the NPC from falling off the map, and it does not give the NPC advanced AI capabilities. Those features would require much more complex scripting.

"Write a script for a realistic door that smoothly swing open when interacted by the player by pressing a key"

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

"a roblox script that makes a specific part reflectance 2.5 and can collide true every 5-10 seconds and turns it the reflectance back to 0 after 1-3 seconds and also makes it can collide false. also tell where to put it"

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

"make ma a script that makes that when i type on the chat "karting" a model appears above me and give instructions"

-- server script (ServerScriptService) to listen to chat and spawn a model 
local Players = game:GetService("Players")

Players.PlayerAdded:Connect(function(player)
    local function onPlayerChatted(message)
        if message:lower() == "karting" then
            local character = player.Character or player.CharacterAdded:Wait()
            local humanoidRootPart = character:WaitForChild("HumanoidRootPart")
            local kartingModel = game.ServerStorage:FindFirstChild("KartingModel")

if kartingModel then
                local kartingClone = kartingModel:Clone()
                kartingClone.Parent = game.Workspace
                kartingClone:SetPrimaryPartCFrame(humanoidRootPart.CFrame + Vector3.new(0, 5, 0)) -- Spawn model above the player
                -- Give instructions to the player
                local instructions = Instance.new("BillboardGui", humanoidRootPart)
                instructions.Size = UDim2.new(0, 200, 0, 50)
                instructions.Adornee = humanoidRootPart
                instructions.StudsOffset = Vector3.new(0, 3, 0)
                local textLabel = Instance.new("TextLabel", instructions)
                textLabel.Text = "Use the arrow keys to drive your kart!"
                textLabel.Size = UDim2.new(1, 0, 1, 0)
                textLabel.TextScaled = true
                wait(5) -- Display instructions for 5 seconds
                instructions:Destroy()
            end
        end
    end

player.Chatted:Connect(onPlayerChatted)
end)

-- Note: Make sure to have a model named 'KartingModel' in your ServerStorage for this script to work.

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

"create a script inside a NPC that gives a slime popping particle when NPC is dead"

"award a badge if the player is in the same server as the game's creator"

"every 5 seconds create a column of fire part at any random location within a specified part's location that lasts for 10 seconds. The column of fire do 5 damage per second to any player hit by them"

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

"can you make a script that lets 2 scoreboards keep score of goals when a blue's part get's touched red gets a point and when red's part gets touched blue team gets a point. comments please"

"script a image label called Stamina and it goes down when players run"

"same code but the names are in a list and when they choose the player to explode and the player explodes make it so the gui comes off there screen also make it so the kal part leaves when walked into then come back in 50 seconds"

"make a lava"

"when proximity prompt called ON is activated part menu transparency is 0 and coll"

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

"create a script that makes the player spin at all times unless they hit the g key"

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

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

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

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

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

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

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

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

RunService.RenderStepped:Connect(updateHeadRotation)
```

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

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

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

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

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

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

UserInputService.InputBegan:Connect(onInputBegan)

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

"the distance is not being tracked properly, can you fix this?"

Certainly! If you're looking to track the distance between the player and a specific object or point in the game and update a text label accordingly, you'll need to continuously check the distance and update the label. Below is an example script that could be placed in a LocalScript to track the distance between the player's character and a specific part (for instance, "MoveToPart") in the game. This script updates a text label with the current distance, fixing the issue of not properly tracking distance.

```lua
-- LocalScript under StarterGui or a ScreenGui within the player's PlayerGui
local player = game:GetService("Players").LocalPlayer
local playerGui = player:WaitForChild("PlayerGui")
local screenGui = playerGui:WaitForChild("ScreenGui") -- Make sure this is the correct path to your ScreenGui
local textLabel = screenGui:WaitForChild("TextLabel") -- Ensure you have a TextLabel named "TextLabel"

local targetPart = game.Workspace:WaitForChild("MoveToPart") -- The part you want to measure distance to

-- Function to update the label with the distance
local function updateDistance()
    while true do
        if player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
            local distance = (player.Character.HumanoidRootPart.Position - targetPart.Position).magnitude
            textLabel.Text = "Distance: " .. math.floor(distance) -- Update the text label with the distance, rounded down
        end
        wait(0.1) -- Update every 0.1 seconds. Adjust as needed.
    end
end

-- Start tracking
updateDistance()
```

This script assumes you have a `ScreenGui` with a `TextLabel` inside the player's `PlayerGui`, and a part named "MoveToPart" in the Workspace. It continuously calculates the distance between the player's `HumanoidRootPart` and the `MoveToPart`, updating the `TextLabel` with the current distance rounded down to the nearest whole number.

Remember to adjust the script paths (`"ScreenGui"` and `"TextLabel"`) to match the actual hierarchy and names in your game. Also, ensure the script is running in a context where it has access to the player's `PlayerGui`, typically within a `LocalScript` under `StarterGui` or directly within the `PlayerGui`.

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

"Can we improve this script by making the camerapart follow the player so that the camera isn't fixed at the location of the part but still stays with the player?"

Yes, we can improve the script by making the cameraPart follow the player. Here's how you can do it:

```lua
-- Local script 
local player = game.Players.LocalPlayer
local UserInputService = game:GetService("UserInputService")
local camera = workspace.CurrentCamera
local zoomedIn = false
local defaultFieldOfView = 70
local zoomedFieldOfView = 20
local zoomOffset = Vector3.new(0, 2, 0) -- this is the offset value when zoomed in

-- Create an invisible part for the camera to follow
local cameraPart = Instance.new("Part")
cameraPart.Transparency = 1
cameraPart.CanCollide = false
cameraPart.Anchored = true
cameraPart.Parent = workspace

-- Create a function to update the camera part's position
local function updateCameraPart()
    if zoomedIn then
        cameraPart.Position = player.Character.HumanoidRootPart.Position + zoomOffset -- move the camera part
    end
end

-- Connect the function to the RenderStepped event
game:GetService("RunService").RenderStepped:Connect(updateCameraPart)

UserInputService.InputBegan:Connect(function(input)
    if input.KeyCode == Enum.KeyCode.Z then
        if zoomedIn then
            camera.FieldOfView = defaultFieldOfView
            camera.CameraSubject = player.Character.Humanoid -- set the camera to follow the player
            zoomedIn = false
        else
            camera.FieldOfView = zoomedFieldOfView
            camera.CameraSubject = cameraPart -- set the camera to follow the camera part
            zoomedIn = true
        end
    end
end)
```

In this script, we added a function `updateCameraPart` to update the position of the camera part. We connected this function to the `RenderStepped` event, which fires every time a frame is rendered. This will make the camera part follow the player when zoomed in.

"use Perlin noise or other procedural techniques to create more realistic cloud formations using Decals"

"and add that you can do max 4 punches before the cooldown starting"

-- roblox script 
-- local script 
local player = game:GetService("Players").LocalPlayer
local mouse = player:GetMouse()
local humanoid = player.Character.Humanoid
local animation1 = game:GetService("ReplicatedStorage")["right punch"]
local animation2 = game:GetService("ReplicatedStorage")["left punch"]
local currentAnimation = animation1
local isAnimating = false
local punchCount = 0
local cooldown = false
local resetCounterTime = 2 -- time in seconds
local maxPunches = 4 -- max punches before cooldown

local function resetCounter()
	punchCount = 0
	cooldown = false
end

local function startResetCounterTimer()
	local timer = resetCounterTime
	while timer > 0 and punchCount > 0 do
		wait(1)
		timer = timer - 1
	end
	if punchCount > 0 then
		resetCounter()
	end
end

mouse.Button1Down:Connect(function()
	if not isAnimating and not cooldown then
		isAnimating = true
		local anim = humanoid:LoadAnimation(currentAnimation)
		anim:Play()
		punchCount = punchCount + 1
		if punchCount >= maxPunches then
			cooldown = true
			wait(2)
			resetCounter()
		else
			startResetCounterTimer()
		end
		while anim.IsPlaying do
			wait()
		end
		if currentAnimation == animation1 then
			currentAnimation = animation2
		else
			currentAnimation = animation1
		end
		isAnimating = false
	end
end)

"Make a GUI that the background is black"

"Write me a inventory system that can handle adding, removing, stacking, fetch, and create an inventory for a player when they join. Include creating an inventory for a specific object aswell."

-- Inventory module (ReplicatedStorage) 
local Inventory = {}
Inventory.__index = Inventory

function Inventory.new()
    local self = setmetatable({}, Inventory)
    self.items = {}
    return self
end

function Inventory:add(itemName, amount)
    if self.items[itemName] then
        self.items[itemName] = self.items[itemName] + amount
    else
        self.items[itemName] = amount
    end
end

function Inventory:remove(itemName, amount)
    if self.items[itemName] and self.items[itemName] >= amount then
        self.items[itemName] = self.items[itemName] - amount
        if self.items[itemName] <= 0 then
            self.items[itemName] = nil
        end
    end
end

function Inventory:fetch(itemName)
    return self.items[itemName] or 0
end

function Inventory:getItems()
    return self.items
end

return Inventory

-- server script (ServerScriptService) 
local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local Inventory = require(ReplicatedStorage.Inventory)

local function onPlayerAdded(player)
    local playerInventory = Inventory.new()
    player:SetAttribute("Inventory", playerInventory)
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- server script for a specific object (ServerScriptService) 
local object = game.Workspace.Object
local objectInventory = Inventory.new()

object:SetAttribute("Inventory", objectInventory)

"black and white background gui"

"Create a dance chat command that plays a dance emote"

"create a time stop function that stops time for 5 seconds and then resume everything back to normal. Press the left button to activate timestop"

"create a /ban command using the player's "User" or "User id" and make sure there permantely banned from the game meaning they are not allowed to join the game anymore and only the user "Albins1213" can use this command"

"Make a script for me where, anytime player has taken damage, all entites freeze for 2 seconds, then unfreeze, instantly reverse 10 seconds backwards in time. tell me where to paste this"

-- This script should be placed in a ServerScriptService 
game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(character)
        local humanoid = character:WaitForChild("Humanoid")
        humanoid.Damaged:Connect(function()
            -- Freeze all entities
            for _, entity in ipairs(game.Workspace:GetChildren()) do
                if entity:IsA("BasePart") then
                    entity.Anchored = true
                end
            end
            wait(2) -- Wait for 2 seconds
            -- Unfreeze all entities
            for _, entity in ipairs(game.Workspace:GetChildren()) do
                if entity:IsA("BasePart") then
                    entity.Anchored = false
                end
            end
            -- Reverse time by 10 seconds is not possible in Roblox
        end)
    end)
end)
-- Please note that reversing time by 10 seconds is not possible in Roblox. This script will freeze and unfreeze all entities in the workspace when a player takes damage.

"make a combat system with a 5 hit rule with animations r6"

"create a datastore that saves a Bool value called Knight inside the player"

"create a script that makes Gui Frame only visible to players who has the bool value of Knight inside the Screen gui"

"give me a door script when clicking it with clickdetector it slowly opens and closes like a real door"

"create a player drag system with a rope with the keybind G"

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

"make a rpg menu using leaderstats with a leveling health and gold system that show how much you have of each and make every npc you kill give you exp depending on the value of the value object also use no other scripts and put all of the code needed to make the script fully work syncing stats"

-- Server Script

-- Create Leaderstats and values for each player
game.Players.PlayerAdded:Connect(function(player)
    local leaderstats = Instance.new("Folder")
    leaderstats.Name = "leaderstats"
    leaderstats.Parent = player

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

local Health = Instance.new("IntValue")
    Health.Name = "Health"
    Health.Value = 100
    Health.Parent = leaderstats

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

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

-- Add exp and gold when an NPC is killed
game.Workspace.NPCs.ChildAdded:Connect(function(npc)
    npc.Humanoid.Died:Connect(function()
        local killer = game.Players:GetPlayerFromCharacter(npc.Humanoid.Killer.Parent)
        if killer then
            killer.leaderstats.Exp.Value = killer.leaderstats.Exp.Value + npc.Value.Value
            killer.leaderstats.Gold.Value = killer.leaderstats.Gold.Value + npc.Value.Value
            -- Level up if exp is greater than 100
            if killer.leaderstats.Exp.Value >= 100 then
                killer.leaderstats.Level.Value = killer.leaderstats.Level.Value + 1
                killer.leaderstats.Exp.Value = 0
            end
        end
    end)
end)

-- Decrease health when player is attacked
game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(character)
        character.Humanoid.TakingDamage:Connect(function(amount)
            player.leaderstats.Health.Value = player.leaderstats.Health.Value - amount
        end)
    end)
end)

"when player click's the textbutton named "Eco" it toggles a local script named "Ecoscript" and if they click the textbutton again, it stops the script"

"I want to limit the number of times certain badges can be obtained for everyone."

"create an NPC that follows the player infinitely"

"script that waits 1 second then makes the player that triggered it unable to move at all, plays a sound, 2.8 seconds after the sound. the screen goes black, ALL of this only happens when the script.Parent is touched by a humanoid."

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

"I want a NPC that can shoot with extremely high accuracy useing various methods to get the players future poistion and make every shot land and not allow the player to avoid it."

-- server script 
local pfs = game:GetService("PathfindingService")
local npc = game.Workspace.NPC
local projectileSpeed = 100 -- adjust this value for the projectile speed

local function getFuturePosition(player)
    local playerPosition = player.Character.HumanoidRootPart.Position
    local playerVelocity = player.Character.HumanoidRootPart.Velocity
    local distance = (npc.HumanoidRootPart.Position - playerPosition).Magnitude
    local timeToImpact = distance / projectileSpeed
    
    return playerPosition + playerVelocity * timeToImpact
end

local function shoot(player)
    local futurePosition = getFuturePosition(player)
    local projectile = Instance.new("Part")
    projectile.Shape = "Ball"
    projectile.Size = Vector3.new(1, 1, 1)
    projectile.Position = npc.HumanoidRootPart.Position
    projectile.Parent = game.Workspace
    projectile.BrickColor = BrickColor.new("Bright red")
    
    local bodyVelocity = Instance.new("BodyVelocity")
    bodyVelocity.MaxForce = Vector3.new(math.huge, math.huge, math.huge)
    bodyVelocity.Velocity = (futurePosition - npc.HumanoidRootPart.Position).Unit * projectileSpeed
    bodyVelocity.Parent = projectile
    
    game:GetService("Debris"):AddItem(projectile, 5) -- remove the projectile after 5 seconds
end

while true do
    for _, player in ipairs(game:GetService("Players"):GetPlayers()) do
        if player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
            shoot(player)
            wait(1) -- adjust the shooting interval
        end
    end
end

"script so if a player says swim then run a function"

"make a death leaderstats what all players can see and each time a player dies it will ad 1 score to it"

"Make a leaderboard with wins and a number counter that counts every minute and saves you wins and numbers also make it where you can only step on the wins part once everyday"

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

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

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

local numbers = Instance.new("IntValue")
    numbers.Name = "Numbers"
    numbers.Parent = stats

local lastWin = Instance.new("NumberValue")
    lastWin.Name = "LastWin"
    lastWin.Parent = stats
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- Script for wins part 
local part = script.Parent
local debounce = true

local function onTouched(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player and debounce then
        debounce = false
        local lastWin = player.leaderstats.LastWin.Value
        local currentTime = os.time()

if currentTime - lastWin >= 86400 then
            player.leaderstats.Wins.Value = player.leaderstats.Wins.Value + 1
            player.leaderstats.LastWin.Value = currentTime
        end

wait(1)
        debounce = true
    end
end

part.Touched:Connect(onTouched)

-- Script for number counter (ServerScriptService) 
while true do
    wait(60)
    for _, player in ipairs(game.Players:GetPlayers()) do
        player.leaderstats.Numbers.Value = player.leaderstats.Numbers.Value + 1
    end
end

"Make a script so I fly mid air, stay mid air for 3 seconds and then move back to the ground when pressing space."

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

"Make a leaderstats that has kills and deaths"

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

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

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

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

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

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

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

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

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

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

-- local script 
local part = script.Parent
local tool = part.Parent
local humanoid = tool.Parent:FindFirstChild("Humanoid")
local bullet = game.ReplicatedStorage.Bullet

part.Touched:Connect(function(hit)
	local humanoid = hit.Parent:FindFirstChild("Humanoid")
	if humanoid then
		local damage = 5
		humanoid:TakeDamage(damage)
	end
end)

tool.Equipped:Connect(function(mouse)
	local character = tool.Parent
	local humanoid = character:FindFirstChild("Humanoid")
	local rootPart = character:FindFirstChild("HumanoidRootPart")
	
	local function followArm()
		local rootCFrame = rootPart.CFrame
		local rightArmCFrame = rootCFrame * CFrame.new(1.5, 0, 0)
		part.CFrame = rightArmCFrame
	end
	
	mouse.Button1Down:Connect(function()
		local bullet = bullet:Clone()
		bullet.Parent = workspace
		bullet.CFrame = part.CFrame
		bullet:SetNetworkOwner(nil)
		
		local bulletVelocity = part.CFrame.lookVector * 50
		bullet:SetVelocity(bulletVelocity)
	end)
	
	while humanoid.Health > 0 do
		followArm()
		wait()
	end
end)

"make a roblox lua script that makes it so the player walkspeed is faster"

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

"in roblox lua. write a simple script that when the player has a tool named Broom equipped then the proximityprompt named proxtrash1 is enabled else its false the proxtrash1 is this scripts parent"

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

"create a level system with xp that changes players health and the damage of the players weapon"

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

function addXP(player, amount)
    local stats = player:WaitForChild("leaderstats")
    local xp = stats:WaitForChild("XP")
    xp.Value = xp.Value + amount
end

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

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

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

local health = Instance.new("IntValue")
    health.Name = "Health"
    health.Value = 100
    health.Parent = stats

local damage = Instance.new("IntValue")
    damage.Name = "Damage"
    damage.Value = 10
    damage.Parent = stats
end)

-- script for updating levels, health, and damage 
local Players = game:GetService("Players")

function updateStats(player)
    local stats = player:WaitForChild("leaderstats")
    local xp = stats:WaitForChild("XP")
    local level = stats:WaitForChild("Level")
    local health = stats:WaitForChild("Health")
    local damage = stats:WaitForChild("Damage")

while true do
        wait(1)
        if xp.Value >= (level.Value * 100) then
            level.Value = level.Value + 1
            health.Value = 100 + (level.Value * 10)
            damage.Value = 10 + (level.Value * 2)
            player.Character.Humanoid.MaxHealth = health.Value
            player.Character.Humanoid.Health = health.Value
        end
    end
end

Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function()
        updateStats(player)
    end)
end)

"change health of a player on part touch"

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

"When player touch a part will have speed and when will not touch will noi have speed"

"make a shift to sprint"

"make a part change color every 2 seconds to a random color make it work inside of the part and make the selection of colors be 15 random colors"

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

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

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

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

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

local tool = script.Parent
local damage = 10

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

tool.Activated:Connect(onActivated)

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

local part = script.Parent
local stealTime = 5

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

part.Touched:Connect(onTouched)

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

"try doing a command that if any player says "chealth" then make a gui appear that tells the player its max health and current health for 5 seconds. the textlabel already exists"

"light up a part"

"make a script after 120 seconds in the game, The npcs Zombie 3 and Zombie 4 will start being cloned and the clones will appear on the Zombie spawner 3 and Zombie spawner 4 every 2 seconds."

-- First, ensure that you have the NPCs 'Zombie 3' and 'Zombie 4' in your workspace, as well as the spawn points 'Zombie spawner 3' and 'Zombie spawner 4'

-- Insert this script into a ServerScriptService

local Workspace = game:GetService("Workspace")

-- Define the NPCs and spawn points
local zombie3 = Workspace:FindFirstChild("Zombie 3")
local zombie4 = Workspace:FindFirstChild("Zombie 4")
local spawner3 = Workspace:FindFirstChild("Zombie spawner 3")
local spawner4 = Workspace:FindFirstChild("Zombie spawner 4")

-- Wait for 120 seconds after the game starts
wait(120)

while true do
    -- Clone the NPCs
    local zombie3Clone = zombie3:Clone()
    local zombie4Clone = zombie4:Clone()

-- Set the position of the clones to the position of the spawn points
    zombie3Clone.PrimaryPart.Position = spawner3.Position
    zombie4Clone.PrimaryPart.Position = spawner4.Position

-- Parent the clones to the workspace
    zombie3Clone.Parent = Workspace
    zombie4Clone.Parent = Workspace

-- Wait for 2 seconds before repeating the loop
    wait(2)
end