Haddock - Roblox Library

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

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

"a working chatGPT gui that answers any questions about roblox studio using http requests and tell me where the script goes"

-- ScripterAI can't create a working ChatGPT GUI directly in Roblox due to API limitations. However, you can create an external server that communicates with the ChatGPT API and sends the response back to Roblox. Here's a basic example using an HTTP request in Roblox and a simple server in Python using Flask.

-- Roblox Script (LocalScript in StarterGui) 
local httpService = game:GetService("HttpService")
local userInput = script.Parent.UserInput
local submitButton = script.Parent.SubmitButton
local responseLabel = script.Parent.ResponseLabel

local serverUrl = "http://your_server_url_here/ask"

local function onSubmit()
    local question = userInput.Text
    local requestData = {
        question = question
    }
    local headers = {
        ["Content-Type"] = "application/json"
    }
    local response = httpService:RequestAsync({
        Url = serverUrl,
        Method = "POST",
        Headers = headers,
        Body = httpService:JSONEncode(requestData)
    })

if response.Success then
        local responseData = httpService:JSONDecode(response.Body)
        responseLabel.Text = responseData.answer
    else
        responseLabel.Text = "Error: Unable to get a response."
    end
end

submitButton.MouseButton1Click:Connect(onSubmit)

-- Python Server (Flask) 
from flask import Flask, request, jsonify
import openai

app = Flask(__name__)
openai.api_key = "your_openai_api_key_here"

@app.route('/ask', methods=['POST'])
def ask():
    data = request.get_json()
    question = data['question']

response = openai.Completion.create(
        engine="text-davinci-002",
        prompt=f"Answer the following question about Roblox Studio: {question}",
        max_tokens=50,
        n=1,
        stop=None,
        temperature=0.5,
    )

answer = response.choices[0].text.strip()
    return jsonify(answer=answer)

if __name__ == '__main__':
    app.run()

-- Make sure to replace "your_server_url_here" in the Roblox script with your actual server URL, and "your_openai_api_key_here" in the Python server script with your actual OpenAI API key. Note that this example is for educational purposes only and may require additional setup and security measures for a production environment.

"make that my arms doesn't make damage until the animation plays"

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

local punching = false
local punchCount = 0
local canPunch = true
local hitCharacters = {}

local function punch()
	if canPunch then
		local arm = character:FindFirstChild(punching and "Left Arm" or "Right Arm")
		arm.Touched:Connect(function(part)
			local otherCharacter = part.Parent
			local otherHumanoid = otherCharacter:FindFirstChildWhichIsA("Humanoid")
			if otherHumanoid and not hitCharacters[otherCharacter] and (animTrack1.IsPlaying or animTrack2.IsPlaying) then
				hitCharacters[otherCharacter] = true
				otherHumanoid:TakeDamage(10)
				wait(1)
				hitCharacters[otherCharacter] = nil
			end
		end)
		punching = not punching
		local animTrack = punching and animTrack1 or animTrack2
		animTrack:Stop()
		animTrack:Play()
		punchCount = punchCount + 1
		if punchCount >= 4 then
			canPunch = false
			wait(2)
			canPunch = true
			punchCount = 0
		end
	end
end

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

"turn a tool called Egg into a random Tool from A folder called Weapons from ServerStorage"

"create a script that gives a player 1 random item from a folder in serverstorage called ToolsFolder when a player right clicks on a part called Chest"

"get a model in serverstorage and clone it into workspace"

"make a hint script that randomizes the fog color and randomize the sparkles color and add sparkles to all parts"

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

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

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

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

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

teleportPart.Touched:Connect(onPartTouch)
```

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

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

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

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

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

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

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

"if button mouseclicked cycle thru 3 enum thumbnailtypes, headshot, avatar bust and avatar thumbnail, each time the button is pressed it cycle through those 3 enum thumbnailtypes. make sure it doesnt repeat 2 enum thumbnailtypes, should be one different one and another different one"

"use the same code but add to this so when i equip my tool and hit the sphere it goes back (with instructions on where to insert the code)"

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

local function followPlayer(player)
	local sphere = Instance.new('Part', game.Workspace)
	sphere.Name = "FollowSphere"
	sphere.Shape = Enum.PartType.Ball
	sphere.Size = Vector3.new(2, 2, 2)
	sphere.Anchored = false
	sphere.Position = player.Character.HumanoidRootPart.Position + Vector3.new(0, 5, 0)

local bodyPosition = Instance.new('BodyPosition', sphere)
	bodyPosition.D = 500
	bodyPosition.P = 3000
	bodyPosition.MaxForce = Vector3.new(400000, 400000, 400000)

while sphere and player.Character and player.Character:FindFirstChild('HumanoidRootPart') do
		local distance = (sphere.Position - player.Character.HumanoidRootPart.Position).Magnitude
		if distance > 5 then
			bodyPosition.Position = player.Character.HumanoidRootPart.Position + Vector3.new(0, 5, 0)
		end
		task.wait(0.5) 
	end
end

Players.PlayerAdded:Connect(function(player)
	player.CharacterAdded:Connect(function(character)
		followPlayer(player)
	end)
end)

-- server script for tool 
local tool = script.Parent
tool.Equipped:Connect(function()
	local player = game.Players.LocalPlayer
	local sphere = game.Workspace:FindFirstChild("FollowSphere")
	if sphere then
		sphere.Touched:Connect(function(hit)
			if hit.Parent == player.Character then
				sphere.Position = player.Character.HumanoidRootPart.Position + Vector3.new(0, 50, 0)
			end
		end)
	end
end)

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

-- server script 
local badgeService = game:GetService("BadgeService")
local badgeStage26 = 123456789 -- Replace with the badge ID for Stage 26
local badgeStage51 = 987654321 -- Replace with the badge ID for Stage 51
local badgeRebirth1 = 111111111 -- Replace with the badge ID for Rebirth 1
local badgeRebirth5 = 555555555 -- Replace with the badge ID for Rebirth 5

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

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

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

game.Players.PlayerAdded:Connect(function(player)
    player.leaderstats.Stage.Changed:Connect(function()
        awardBadge(player)
    end)

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

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

"create a local script inside a tool that plays a idle animation when the player is holding the tool but stops when the player left clicks"

-- local script inside a tool 
local tool = script.Parent
local animation = Instance.new("Animation")
animation.AnimationId = "rbxassetid://YOUR_ANIMATION_ID_HERE"

local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local animator = humanoid:WaitForChild("Animator")

local playingAnimation = false
local animTrack

local function playIdleAnimation()
    if not playingAnimation then
        playingAnimation = true
        animTrack = animator:LoadAnimation(animation)
        animTrack:Play()
    end
end

local function stopIdleAnimation()
    if playingAnimation then
        playingAnimation = false
        animTrack:Stop()
    end
end

tool.Equipped:Connect(playIdleAnimation)
tool.Unequipped:Connect(stopIdleAnimation)

tool.Activated:Connect(function()
    stopIdleAnimation()
    wait(0.5) -- Adjust this value based on the duration of the action you want to perform
    playIdleAnimation()
end)

"When this script runs, if the player moves their footsteps can still be heard. How can this be fixed?"

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

"Can you create a custom character movement system that simulates real life human behavior when moving around and overrides the default ROBLOX character movement?"

Creating a custom character movement system that simulates real-life human behavior is a complex task and would require a lot of code. However, I can provide you with a basic example of how to override the default Roblox character movement system and implement a custom one.

In this example, we will create a simple custom character movement system that allows the player to move forward, backward, left, and right using the WASD keys. This script should be placed in a LocalScript inside the StarterPlayerScripts folder.

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

local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local rootPart = character:WaitForChild("HumanoidRootPart")

local moveDirection = Vector3.new(0, 0, 0)

local function updateMovement(input, isKeyDown)
	local inputKey = input.KeyCode
	if inputKey == Enum.KeyCode.W then
		moveDirection = moveDirection + Vector3.new(0, 0, -1)
	elseif inputKey == Enum.KeyCode.A then
		moveDirection = moveDirection + Vector3.new(-1, 0, 0)
	elseif inputKey == Enum.KeyCode.S then
		moveDirection = moveDirection + Vector3.new(0, 0, 1)
	elseif inputKey == Enum.KeyCode.D then
		moveDirection = moveDirection + Vector3.new(1, 0, 0)
	end
	
	if not isKeyDown then
		moveDirection = moveDirection * -1
	end
end

UserInputService.InputBegan:Connect(function(input, isProcessed)
	if isProcessed then return end
	updateMovement(input, true)
end)

UserInputService.InputEnded:Connect(function(input, isProcessed)
	if isProcessed then return end
	updateMovement(input, false)
end)

while true do
	wait()
	
	local cameraCFrame = workspace.CurrentCamera.CFrame
	local moveVector = cameraCFrame:VectorToWorldSpace(moveDirection)
	moveVector = Vector3.new(moveVector.X, 0, moveVector.Z)
	
	if moveVector.Magnitude > 0 then
		humanoid:Move(moveVector, true)
	else
		humanoid:Move(Vector3.new(0, 0, 0), true)
	end
end
```

This script will override the default Roblox character movement system and allow the player to move using the WASD keys. Keep in mind that this is a basic example, and simulating real-life human behavior would require a more advanced implementation, including animations, physics, and other factors.

"make a part"

"make a system that get 2 nextbots from the replicated storage and the another 2 nextbots in game go to replicated storage"

-- server script 
local replicatedStorage = game.ReplicatedStorage 
local nextbot1 = replicatedStorage.Nextbot1 
local nextbot2 = replicatedStorage.Nextbot2

local function moveNextbot(nextbot)
	local path = game.PathfindingService:CreatePath()
	path:ComputeAsync(nextbot.Position, replicatedStorage.Position)
	
	for _, waypoint in pairs(path:GetWaypoints()) do
		nextbot:MoveTo(waypoint.Position)
		nextbot.MoveToFinished:Wait()
	end
	
	nextbot:Destroy()
end

nextbot1.Touched:Connect(function(otherPart)
	local character = otherPart.Parent
	if character:FindFirstChild("Humanoid") then
		moveNextbot(nextbot1)
	end
end)

nextbot2.Touched:Connect(function(otherPart)
	local character = otherPart.Parent
	if character:FindFirstChild("Humanoid") then
		moveNextbot(nextbot2)
	end
end)

game.Workspace.Nextbot3.Touched:Connect(function(otherPart)
	local character = otherPart.Parent
	if character:FindFirstChild("Humanoid") then
		moveNextbot(game.Workspace.Nextbot3)
	end
end)

game.Workspace.Nextbot4.Touched:Connect(function(otherPart)
	local character = otherPart.Parent
	if character:FindFirstChild("Humanoid") then
		moveNextbot(game.Workspace.Nextbot4)
	end
end)

"change transparency of a GUI element when a slider is moved"

"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 it so if i say play in chat then a roblox music id. It makes a mouth on my character removes my face and visualizes the id."

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

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

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

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

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

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

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

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

players.PlayerAdded:Connect(onPlayerAdded)

"can u fix me this script local char = script.Parent local hum = char:WaitForChild("Humanoid") local originalspeed = script:WaitForChild("originalspeed").Value local maxspeed = originalspeed * 1.15 -- 20% speed increase local speeduptime = script:WaitForChild("speeduptime").Value local runanim = h"

"Write me a script that makes the game time run like it does in the real world"

"create small money simulator for purchasing products"

"make it tween the size of the button to {0.144, 0},{0.072, 0} and tween the frame size to 0,0,0,0"

"make the part the script is inside of drops bright red parts with a value of 1 inside of them and make the part size 1"

"add a bullet counter gui"

"make a roblox script where If Harlandroblox says !game1 then my Part in ReplicatedStorage called highhh will come out and then after my Part called highhh comes out of ReplicatedStorage 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 my Part called gam will go back to normal after 10 seconds then my Part called highhh will go back into ReplicatedStorage and then when you step on my Part called gam it will no longer kick you make it all one code block"

local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local highhh = ReplicatedStorage:WaitForChild("highhh")
local gam = workspace:WaitForChild("gam")

local function onPlayerChatted(player, message)
	if player.Name == "Harlandroblox" and message == "!game1" then
		highhh.Parent = workspace
		local timerGui = Instance.new("ScreenGui", player.PlayerGui)
		local timerLabel = Instance.new("TextLabel", timerGui)
		timerLabel.Text = "5"
		timerLabel.Size = UDim2.new(0, 100, 0, 50)
		timerLabel.Position = UDim2.new(0.5, -50, 0, 10)
		timerLabel.BackgroundTransparency = 1
		timerLabel.TextScaled = true
		timerLabel.Font = Enum.Font.SourceSansBold
		timerLabel.TextColor3 = Color3.new(1, 1, 1)

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

timerGui:Destroy()
		gam.Transparency = 0

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

local connection = gam.Touched:Connect(onTouched)
		wait(10)
		connection:Disconnect()
		gam.Transparency = 1
		highhh.Parent = ReplicatedStorage
	end
end

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

Players.PlayerAdded:Connect(onPlayerAdded)

"create a join server button that shows how many players are in that server and if its full it will not teleport the player and it will say server full"

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

"make it so also along with give theres a remove which does the opposite of give and instead removes value, for the remove command if a player has 800 and reduces to 900 instead of -100 make it 0 for example"

-- roblox script 
local allowedUsers = {"MrTexan789777", "qw3rty_l0l", "oddsansee1231"}
local commandPrefix = "give"
local removePrefix = "remove"
local currencyName = coinName

local function findPlayer(startName)
	for _, player in pairs(game.Players:GetPlayers()) do
		if string.sub(string.lower(player.Name), 1, #startName) == string.lower(startName) then
			return player
		end
	end
end

game.Players.PlayerAdded:Connect(function(player)
	player.Chatted:Connect(function(message)
		local messageParts = string.split(string.lower(message), " ")
		local command = messageParts[1]
		local targetStartName = messageParts[2]
		local amount = tonumber(messageParts[3])

if command == commandPrefix or command == removePrefix then
			for i, username in ipairs(allowedUsers) do
				if string.lower(player.Name) == string.lower(username) then
					local targetPlayer = findPlayer(targetStartName)
					if targetPlayer and amount then
						local leaderstats = targetPlayer:FindFirstChild("leaderstats")
						if leaderstats then
							local currency = leaderstats:FindFirstChild(currencyName)
							if currency then
								if command == commandPrefix then
									currency.Value = currency.Value + amount
								elseif command == removePrefix then
									currency.Value = math.max(0, currency.Value - amount)
								end
							end
						end
					elseif targetStartName == "me" then
						local leaderstats = player:FindFirstChild("leaderstats")
						if leaderstats then
							local currency = leaderstats:FindFirstChild(currencyName)
							if currency then
								if command == commandPrefix then
									currency.Value = currency.Value + amount
								elseif command == removePrefix then
									currency.Value = math.max(0, currency.Value - amount)
								end
							end
						end
					end
				end
			end
		end
	end)
end)

"make me an ultumate trolling gui"

"if player has bought a product with a specific id, make all the players in the server dance for 10 seconds. add comments to show me where to put things in studio and what it does"

"make a script if you press q it places a wall in front of you"

"make a part move forever and make it loop once it reaches the max studs and make it affect the part named water"

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

-- module script (ServerScriptService) 
local DataStoreService = game:GetService("DataStoreService")
local levelStore = DataStoreService:GetDataStore("PlayerLevels")
local XPStore = DataStoreService:GetDataStore("PlayerXP")

local module = {}

function module:GetLevel(player)
    local level = levelStore:GetAsync(player.UserId)
    if not level then
        level = 1
        levelStore:SetAsync(player.UserId, level)
    end
    return level
end

function module:GetXP(player)
    local xp = XPStore:GetAsync(player.UserId)
    if not xp then
        xp = 0
        XPStore:SetAsync(player.UserId, xp)
    end
    return xp
end

function module:AddXP(player, amount)
    local xp = module:GetXP(player)
    xp = xp + amount
    XPStore:SetAsync(player.UserId, xp)
    return xp
end

function module:UpdateLevel(player)
    local xp = module:GetXP(player)
    local level = module:GetLevel(player)
    local newLevel = math.floor(xp / 100) + 1
    if newLevel > level then
        levelStore:SetAsync(player.UserId, newLevel)
    end
    return newLevel
end

return module

-- server script (ServerScriptService) 
local levelSystem = require(game.ServerScriptService.LevelSystem)

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 = levelSystem:GetLevel(player)
    level.Parent = leaderstats

local xp = Instance.new("IntValue")
    xp.Name = "XP"
    xp.Value = levelSystem:GetXP(player)
    xp.Parent = leaderstats

player.CharacterAdded:Connect(function(character)
        local humanoid = character:WaitForChild("Humanoid")
        humanoid.MaxHealth = 100 + (10 * level.Value)
        humanoid.Health = humanoid.MaxHealth
    end)
end)

game.Players.PlayerRemoving:Connect(function(player)
    levelSystem:UpdateLevel(player)
end)

-- weapon damage script 
local weapon = script.Parent
local damageMultiplier = 1.5

weapon.Activated:Connect(function(player)
    local character = player.Character
    if character then
        local humanoid = character:FindFirstChild("Humanoid")
        if humanoid then
            local level = player.leaderstats.Level.Value
            local baseDamage = 10
            local damage = baseDamage + (level * damageMultiplier)
            humanoid:TakeDamage(damage)
        end
    end
end)

"when a players touches my Part it will launch them into the air with 1000 jumppower"

"create a script that whenever the player clicks the screen, it plays an animation on them, and whoever touches them while that animation plays, they take 10 damage and also play an animation"

-- local script for clicking and playing animation 
local player = game.Players.LocalPlayer
local mouse = player:GetMouse()
local animationId = "rbxassetid://123456789" -- Replace with your animation ID
local animation = Instance.new("Animation")
animation.AnimationId = animationId
local animationTrack
local animPlaying = false

mouse.Button1Down:Connect(function()
    if not animPlaying then
        animPlaying = true
        animationTrack = player.Character.Humanoid:LoadAnimation(animation)
        animationTrack:Play()
        wait(animationTrack.Length)
        animPlaying = false
    end
end)

-- server script for touching and taking damage 
local part = script.Parent
local touchAnimationId = "rbxassetid://987654321" -- Replace with your touch animation ID
local touchAnimation = Instance.new("Animation")
touchAnimation.AnimationId = touchAnimationId

local function onTouch(otherPart)
    local otherPlayer = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if otherPlayer and animPlaying then
        local otherHumanoid = otherPart.Parent:FindFirstChild("Humanoid")
        if otherHumanoid then
            otherHumanoid.Health = otherHumanoid.Health - 10
            local touchAnimationTrack = otherHumanoid:LoadAnimation(touchAnimation)
            touchAnimationTrack:Play()
        end
    end
end

part.Touched:Connect(onTouch)

"Write me a script that simulates the player limping when their health reaches a certain amount"

"make a script that grows a plant when someone clicks a part named plantable with a tool named seeds. once the plant is grown and the player clicks it, it should clone a tool named "plant" into their backpack."

"make a script that gives you 10 "BabaCoins" Every 30 seconds you play the game"

"create a terrain that has a large terrain"

"make a maze generator using a grid of 3 by 3"

-- Script for Maze Generation 
local Maze = {}
local Cell = {}
local Grid = {}
local Stack = {}

local Size = Vector2.new(3,3)

function Cell.new(x, y)
    local self = {}
    self.x = x
    self.y = y
    self.walls = {true, true, true, true}
    self.visited = false
    return self
end

function Grid.new(size)
    local self = {}
    self.size = size
    self.grid = {}
    for y=1, size.y do
        for x=1, size.x do
            table.insert(self.grid, Cell.new(x, y))
        end
    end
    return self
end

function Maze.new(grid)
    local self = {}
    self.grid = grid
    self.current = grid.grid[1]
    return self
end

function Maze:generate()
    self.current.visited = true
    local next = self:checkNeighbors(self.current)
    if next then
        next.visited = true
        table.insert(Stack, self.current)
        self:removeWalls(self.current, next)
        self.current = next
    elseif #Stack > 0 then
        self.current = table.remove(Stack)
    end
end

function Maze:checkNeighbors(cell)
    local neighbors = {}
    local top = self.grid.grid[self:index(cell.x, cell.y - 1)]
    local right = self.grid.grid[self:index(cell.x + 1, cell.y)]
    local bottom = self.grid.grid[self:index(cell.x, cell.y + 1)]
    local left = self.grid.grid[self:index(cell.x - 1, cell.y)]

if top and not top.visited then
        table.insert(neighbors, top)
    end
    if right and not right.visited then
        table.insert(neighbors, right)
    end
    if bottom and not bottom.visited then
        table.insert(neighbors, bottom)
    end
    if left and not left.visited then
        table.insert(neighbors, left)
    end

if #neighbors > 0 then
        return neighbors[math.random(#neighbors)]
    else
        return nil
    end
end

function Maze:index(x, y)
    if x < 1 or y < 1 or x > self.grid.size.x or y > self.grid.size.y then
        return nil
    end
    return x + (y - 1) * self.grid.size.x
end

function Maze:removeWalls(a, b)
    local x = a.x - b.x
    if x == 1 then
        a.walls[4] = false
        b.walls[2] = false
    elseif x == -1 then
        a.walls[2] = false
        b.walls[4] = false
    end
    local y = a.y - b.y
    if y == 1 then
        a.walls[1] = false
        b.walls[3] = false
    elseif y == -1 then
        a.walls[3] = false
        b.walls[1] = false
    end
end

local grid = Grid.new(Size)
local maze = Maze.new(grid)
while #Stack > 0 or not maze.current.visited do
    maze:generate()
end
-- Now maze.grid contains a 3x3 grid where each cell has a table of booleans representing if there is a wall or not. 
-- You can use this to create your maze in roblox.

"make a randomly generating forest with trees and lakes and some grass"

"when a player steps on the model, shake the model for 2 seconds and then make the model cancollide false and transparent. make the model cancollide true and opaque after 3 seconds."

-- script for model 
local model = script.Parent
local debounce = true

local function shakeModel()
    local originalPositions = {}
    for _, part in ipairs(model:GetChildren()) do
        if part:IsA("BasePart") then
            originalPositions[part] = part.Position
            part.Anchored = false
        end
    end

for _ = 1, 20 do
        for part, originalPosition in pairs(originalPositions) do
            part.Position = originalPosition + Vector3.new(math.random(-1, 1), math.random(-1, 1), math.random(-1, 1))
        end
        wait(0.1)
    end

for part, originalPosition in pairs(originalPositions) do
        part.Position = originalPosition
        part.Anchored = true
    end
end

local function onTouch(otherPart)
    if debounce then
        debounce = false
        local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
        if player then
            shakeModel()

for _, part in ipairs(model:GetChildren()) do
                if part:IsA("BasePart") then
                    part.CanCollide = false
                    part.Transparency = 0.5
                end
            end

wait(3)

for _, part in ipairs(model:GetChildren()) do
                if part:IsA("BasePart") then
                    part.CanCollide = true
                    part.Transparency = 0
                end
            end
        end
        debounce = true
    end
end

model.PrimaryPart.Touched:Connect(onTouch)

"make a part move to the position of 2 parts one by one smoothly and make it spawn balls that are colored the 4 main colors every 2 seconds on loop also make it work inside of a part named Spawner1 without adding any parts"

-- local script inside Spawner1 
local spawner = script.Parent
local part1 = game.Workspace.Part1
local part2 = game.Workspace.Part2
local TweenService = game:GetService("TweenService")
local colors = {Color3.fromRGB(255, 0, 0), Color3.fromRGB(0, 255, 0), Color3.fromRGB(0, 0, 255), Color3.fromRGB(255, 255, 0)}

local function movePart(part, target)
    local tweenInfo = TweenInfo.new((part.Position - target.Position).Magnitude / 10, Enum.EasingStyle.Linear)
    local goal = {Position = target.Position}
    local tween = TweenService:Create(part, tweenInfo, goal)
    tween:Play()
    tween.Completed:Wait()
end

local function spawnBall()
    local ball = Instance.new("Part")
    ball.Shape = Enum.PartType.Ball
    ball.Size = Vector3.new(1, 1, 1)
    ball.Position = spawner.Position
    ball.Parent = game.Workspace
    ball.BrickColor = BrickColor.new(colors[math.random(1, #colors)])
    ball.Velocity = Vector3.new(0, 50, 0)
    ball.Anchored = false
end

while true do
    movePart(spawner, part1)
    spawnBall()
    wait(2)
    movePart(spawner, part2)
    spawnBall()
    wait(2)
end

"Make me a leaderstats script that updates the value of the players coins and rebirths on the server"

"there is a developer product at the top of the screen what says Random event when you buy it a random event will happen you will get 200 walkspeed of 1000 jumppower or death the developer product id is 1556140163"

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

local devProductId = 1556140163

local devProductButton = Instance.new("TextButton", screenGui)
devProductButton.Text = "Random Event"
devProductButton.TextColor3 = Color3.fromRGB(255, 255, 255)
devProductButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
devProductButton.UICorner = 5
devProductButton.AnchorPoint = Vector2.new(0.5, 0)
devProductButton.Position = UDim2.new(0.5, 0, 0, 0)

local function onDevProductPurchase()
    local randomEvent = math.random(1, 3)

if randomEvent == 1 then
        -- 200 walkspeed 
        player.Character.Humanoid.WalkSpeed = 200
    elseif randomEvent == 2 then
        -- 1000 jumppower 
        player.Character.Humanoid.JumpPower = 1000
    else
        -- death 
        player.Character.Humanoid.Health = 0
    end
end

devProductButton.MouseButton1Click:Connect(function()
    game:GetService("MarketplaceService"):PromptProductPurchase(player, devProductId)
end)

game:GetService("MarketplaceService").PromptProductPurchaseFinished:Connect(function(playerWhoBought, productId, wasPurchased)
    if playerWhoBought == player and productId == devProductId and wasPurchased then
        onDevProductPurchase()
    end
end)

"create a sword combat system"

"write a script for a npc that faces the player and says a message when they are in a certain radius and tell me where to place the script and what kind of script it should be"

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

"if a part is tagged with Lava and a player touches it, kill the player. if a part is tagged with Fall, make the part 0.5 transparent and cancollide false for 3 seconds when a player touches it. add detailed comments, instructions and explanation."

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

local function onTouchLava(hit)
    local player = game.Players:FindFirstChild(hit.Parent.Name)
    if player then
        local character = player.Character
        if character then
            character.Humanoid.Health = 0
        end
    end
end

local function onTouchFall(part)
    part.Transparency = 0.5
    part.CanCollide = false
    wait(3)
    part.Transparency = 0
    part.CanCollide = true
end

local function onTouched(hit, tag)
    if tag == "Lava" then
        onTouchLava(hit)
    elseif tag == "Fall" then
        onTouchFall(hit.Parent)
    end
end

local function partTouched(part)
    local tags = CollectionService:GetTags(part)
    for _, tag in ipairs(tags) do
        part.Touched:Connect(function(hit) onTouched(hit, tag) end)
    end
end

CollectionService:GetInstanceAddedSignal("Lava"):Connect(partTouched)
CollectionService:GetInstanceAddedSignal("Fall"):Connect(partTouched)

for _, part in ipairs(CollectionService:GetTagged("Lava")) do
    partTouched(part)
end

for _, part in ipairs(CollectionService:GetTagged("Fall")) do
    partTouched(part)
end

-- 
Instructions:
1. Create a part in the Workspace and name it "Lava" or "Fall" based on the desired behavior.
2. Add a tag to the part using CollectionService. For example, if the part is named "Lava", add the "Lava" tag.
3. The script will handle the rest. When a player touches a part tagged with "Lava", they will die. When a player touches a part tagged with "Fall", the part will become 0.5 transparent and non-collidable for 3 seconds.

Explanation:
- The script uses CollectionService to detect parts with the "Lava" or "Fall" tags.
- When a part with the "Lava" tag is touched, the onTouchLava function is called, which kills the player.
- When a part with the "Fall" tag is touched, the onTouchFall function is called, which makes the part transparent and non-collidable for 3 seconds.
- The partTouched function connects the Touched event of the part to the appropriate onTouchLava or onTouchFall function based on the tag.
- The script listens for parts with the "Lava" or "Fall" tags being added to the game and applies the partTouched function to them.

"when a player equips a tool named Broom then the Screen GUI named Trash pops up with the text labels thats inside of screen gui. but if the player unequips broom then the screengui disappears making sure the screen gui is invisible when player spawns"

"can you make strikers oddysey pick up ball script"

"make a script that teleports my character on top of a close character when i press z"

-- Local script 
local UserInputService = game:GetService('UserInputService')
local Players = game:GetService('Players')
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()

UserInputService.InputBegan:Connect(function(input)
    if input.KeyCode == Enum.KeyCode.Z then
        local closestCharacter = nil
        local closestDistance = math.huge
        for _, otherPlayer in pairs(Players:GetPlayers()) do
            if otherPlayer ~= player then
                local otherCharacter = otherPlayer.Character
                if otherCharacter then
                    local distance = (character.HumanoidRootPart.Position - otherCharacter.HumanoidRootPart.Position).Magnitude
                    if distance < closestDistance then
                        closestCharacter = otherCharacter
                        closestDistance = distance
                    end
                end
            end
        end
        if closestCharacter then
            character.HumanoidRootPart.CFrame = closestCharacter.HumanoidRootPart.CFrame + Vector3.new(0, 5, 0)
        end
    end
end)

"make a free camera floating above the humanoid at cameraPart.Orientation = Vector3.new(-60, 0, 0) then make it so when y is pressed it enables free camera that has edge scrolling. Make sure edge scrolling is only for free camera"

-- Local script 
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local cameraPart = Instance.new("Part", workspace)
local freeCamEnabled = false

cameraPart.Anchored = true
cameraPart.Transparency = 1
cameraPart.CanCollide = false
cameraPart.Size = Vector3.new(1, 1, 1)
cameraPart.Orientation = Vector3.new(-60, 0, 0)

local function updateCamera()
    while not freeCamEnabled do
        cameraPart.Position = humanoid.RootPart.Position + Vector3.new(0, 10, 0)
        workspace.CurrentCamera.CameraSubject = cameraPart
        wait()
    end
end

local function enableFreeCam()
    freeCamEnabled = true
    workspace.CurrentCamera.CameraSubject = nil
    workspace.CurrentCamera.CameraType = Enum.CameraType.Scriptable
end

local function disableFreeCam()
    freeCamEnabled = false
    workspace.CurrentCamera.CameraType = Enum.CameraType.Custom
    updateCamera()
end

local function onInput(input, gameProcessed)
    if input.KeyCode == Enum.KeyCode.Y and not gameProcessed then
        if not freeCamEnabled then
            enableFreeCam()
        else
            disableFreeCam()
        end
    end
end

UserInputService.InputBegan:Connect(onInput)
updateCamera()

-- Edge scrolling for free camera 
local function edgeScroll()
    local mouse = player:GetMouse()
    local scrollSpeed = 1

while freeCamEnabled do
        local mousePos = mouse.ViewportSize
        local edgeDist = 30

if mousePos.X < edgeDist then
            workspace.CurrentCamera.CFrame = workspace.CurrentCamera.CFrame * CFrame.new(scrollSpeed, 0, 0)
        elseif mousePos.X > mouse.ViewportSize.X - edgeDist then
            workspace.CurrentCamera.CFrame = workspace.CurrentCamera.CFrame * CFrame.new(-scrollSpeed, 0, 0)
        end

if mousePos.Y < edgeDist then
            workspace.CurrentCamera.CFrame = workspace.CurrentCamera.CFrame * CFrame.new(0, scrollSpeed, 0)
        elseif mousePos.Y > mouse.ViewportSize.Y - edgeDist then
            workspace.CurrentCamera.CFrame = workspace.CurrentCamera.CFrame * CFrame.new(0, -scrollSpeed, 0)
        end

wait()
    end
end

edgeScroll()

"make a control panel that can edit the fog and make the panel rainbow"

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

local controlPanel = Instance.new("Frame", screenGui)
controlPanel.BackgroundColor3 = Color3.fromRGB(255, 0, 0) -- Starting color for the rainbow effect

local fogButton = Instance.new("TextButton", controlPanel)
fogButton.Text = "Toggle Fog"
fogButton.TextColor3 = Color3.fromRGB(255, 255, 255)
fogButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
fogButton.UICorner = 5

fogButton.MouseButton1Click:Connect(function()
    if game.Lighting.FogEnd == 100000 then
        game.Lighting.FogEnd = 10000
    else
        game.Lighting.FogEnd = 100000
    end
end)

local colors = {Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 127, 0), Color3.fromRGB(255, 255, 0), Color3.fromRGB(0, 255, 0), Color3.fromRGB(0, 0, 255), Color3.fromRGB(75, 0, 130), Color3.fromRGB(143, 0, 255)} -- Rainbow colors

local currentColor = 1

game:GetService("RunService").Heartbeat:Connect(function()
    controlPanel.BackgroundColor3 = colors[currentColor]
    currentColor = currentColor % #colors + 1
end)

"create me a roblox data player template and say to me where to put it"

Sure, here's a basic template for a player data system using Roblox's DataStore service. This script should be placed in ServerScriptService.

```lua
local DataStoreService = game:GetService("DataStoreService")
local PlayerDataStore = DataStoreService:GetDataStore("PlayerData")

game.Players.PlayerAdded:Connect(function(player)
	local playerUserId = "Player_" .. player.UserId
	local playerData
	local success, err = pcall(function()
		playerData = PlayerDataStore:GetAsync(playerUserId)
	end)
	
	if success then
		if playerData then
			-- Load data
			player.leaderstats.Cash.Value = playerData.Cash
			player.leaderstats.Level.Value = playerData.Level
		else
			-- No data found, setting default values
			player.leaderstats.Cash.Value = 0
			player.leaderstats.Level.Value = 1
		end
	else
		warn("Failed to get data for player " .. player.Name .. " due to " .. err)
	end
end)

game.Players.PlayerRemoving:Connect(function(player)
	local playerUserId = "Player_" .. player.UserId
	local playerData = {
		Cash = player.leaderstats.Cash.Value,
		Level = player.leaderstats.Level.Value
	}
	
	local success, err = pcall(function()
		PlayerDataStore:SetAsync(playerUserId, playerData)
	end)
	
	if not success then
		warn("Failed to save data for player " .. player.Name .. " due to " .. err)
	end
end)
```

This script will save two stats, Cash and Level, for each player. You can add more stats as needed. The data is saved when the player leaves and loaded when they join. Make sure to replace "YourDataStore" with the name of your data store.

If you want to add more stats, you can add them under the playerData table and set their default values under the else statement in the PlayerAdded event.

Note: You will need to create the leaderstats and the Cash and Level IntValue for each player. This is usually done in a separate script in ServerScriptService.

Also, remember to enable API services in your game settings to use DataStore.

"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' also no playergui also no using player leaderstats"

"make a roblox script whenever i hold down right click my mouse locks on to the most close player and it will follow them with the mouse so it aims at them but it does not make my camera zoom to them make it just so it follows them stay in place"

-- local script 
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local mouse = player:GetMouse()
local camera = workspace.CurrentCamera
local tracking = false

local function getClosestPlayer()
    local closestPlayer = nil
    local closestDistance = math.huge
    
    for _, otherPlayer in ipairs(Players:GetPlayers()) do
        if otherPlayer ~= player then
            local distance = (otherPlayer.Character.HumanoidRootPart.Position - player.Character.HumanoidRootPart.Position).magnitude
            if distance < closestDistance then
                closestDistance = distance
                closestPlayer = otherPlayer
            end
        end
    end
    
    return closestPlayer
end

local function update()
    if tracking then
        local closestPlayer = getClosestPlayer()
        if closestPlayer then
            camera.CFrame = CFrame.new(camera.CFrame.p, closestPlayer.Character.HumanoidRootPart.Position)
        end
    end
end

mouse.Button2Down:Connect(function()
    tracking = true
end)

mouse.Button2Up:Connect(function()
    tracking = false
end)

while true do
    update()
    wait()
end

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

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

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

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

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

"when I click the button a frame tweens up from the bottom middle"

"Write me a script that creates a lighting system where lights are added to parts after clicking on a light switch"

-- First, create a part named "LightSwitch" in the Workspace. This will act as the light switch.

-- Server Script
local lightSwitch = game.Workspace.LightSwitch

local function toggleLights()
    local lightsOn = false
    for _, part in ipairs(game.Workspace:GetChildren()) do
        if part:IsA("Part") and part.Name ~= "LightSwitch" then
            if part:FindFirstChild("PointLight") then
                lightsOn = true
                break
            end
        end
    end

for _, part in ipairs(game.Workspace:GetChildren()) do
        if part:IsA("Part") and part.Name ~= "LightSwitch" then
            if lightsOn then
                if part:FindFirstChild("PointLight") then
                    part.PointLight:Destroy()
                end
            else
                if not part:FindFirstChild("PointLight") then
                    local light = Instance.new("PointLight")
                    light.Parent = part
                    light.Range = 10
                    light.Brightness = 5
                end
            end
        end
    end
end

lightSwitch.ClickDetector.MouseClick:Connect(toggleLights)

-- Next, add a ClickDetector to the LightSwitch part in the Workspace. This will detect when the light switch is clicked.

"Write me a script that offsets the camera so that it is not centered on the player"

"player roll system when players presses Q and plays animation and rolls forward"

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

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

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

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

part.Touched:Connect(onTouched)

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

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

Players.PlayerAdded:Connect(onPlayerAdded)

"create a generic time stop script"

"Make me a data store that saves the players coins rebirths and Multiplier in the leaderstats and saves the values of the leaderstats and when the player joins back adds the values saved to the leaderstats again so that other players can see them"

-- Script in ServerScriptService 
local DataStoreService = game:GetService("DataStoreService")
local playerDataStore = DataStoreService:GetDataStore("PlayerData")

local function onSave(player)
    local success, err = pcall(function()
        local leaderstats = player:WaitForChild("leaderstats")
        local data = {
            Coins = leaderstats.Coins.Value,
            Rebirths = leaderstats.Rebirths.Value,
            Multiplier = leaderstats.Multiplier.Value
        }
        playerDataStore:SetAsync(player.UserId, data)
    end)
    if not success then
        warn("Error saving data for " .. player.Name .. ": " .. err)
    end
end

local function onLoad(player)
    local success, err = pcall(function()
        local data = playerDataStore:GetAsync(player.UserId)
        if data then
            local leaderstats = player:WaitForChild("leaderstats")
            leaderstats.Coins.Value = data.Coins
            leaderstats.Rebirths.Value = data.Rebirths
            leaderstats.Multiplier.Value = data.Multiplier
        end
    end)
    if not success then
        warn("Error loading data for " .. player.Name .. ": " .. err)
    end
end

game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Wait()
    onLoad(player)
end)

game.Players.PlayerRemoving:Connect(onSave)

game:BindToClose(function()
    for _, player in ipairs(game.Players:GetPlayers()) do
        onSave(player)
    end
end)

"Make a roblox lua script that when the player joins on vr the way you move in gorilla tag gets applied"

Unfortunately, creating a full Gorilla Tag movement system for Roblox VR is beyond the scope of a simple script response. However, I can provide you with a starting point on how to detect if a player is using VR and how to create a basic movement system based on the player's hand position.

First, you'll need to create a LocalScript in StarterPlayerScripts to detect if a player is using VR and handle the movement.

```lua
local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()

local vrEnabled = UserInputService.VREnabled

if vrEnabled then
    local leftHand = character:WaitForChild("LeftHand")
    local rightHand = character:WaitForChild("RightHand")
    local humanoid = character:WaitForChild("Humanoid")

local function update()
        -- Calculate the average position of the hands
        local handPosition = (leftHand.Position + rightHand.Position) / 2

-- Calculate the direction from the hand position to the character's torso
        local direction = (character.Torso.Position - handPosition).Unit

-- Set the humanoid's move direction based on the calculated direction
        humanoid.MoveDirection = Vector3.new(direction.X, 0, direction.Z)
    end

RunService:BindToRenderStep("VRMovement", Enum.RenderPriority.Input.Value, update)
end
```

This script will detect if the player is using VR and then create a basic movement system based on the average position of the player's hands. The player will move in the direction from their hands to their torso.

Please note that this is a very basic example and will not provide the full Gorilla Tag movement experience. You may need to modify the script and add additional functionality, such as detecting hand movements and applying forces to the character's body parts, to achieve the desired effect.

"make a part spin forever"

"turn a tool called Egg into a random Tool from A folder called Weapons from ServerStorage when player right clicks on the tool called Egg"

"if a player touches BadgePart They Get A badge -- server script lBadge id is 2153405718"

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

-- script for leaderboard 
local dataStoreService = game:GetService("DataStoreService")
local winsDataStore = dataStoreService:GetDataStore("WinsDataStore")

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

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

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

if success then
        wins.Value = data or 0
    else
        print("Error loading data for "..player.Name..": "..err)
    end
end

local function onPlayerRemoving(player)
    local wins = player.leaderstats.Wins.Value
    local success, err = pcall(function()
        winsDataStore:SetAsync(player.UserId, wins)
    end)

if not success then
        print("Error saving data for "..player.Name..": "..err)
    end
end

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

-- script for part 
local part = script.Parent

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

part.Touched:Connect(addWin)

"make me fly if i press "e" and i can toggle on/off."

"make me an voice chat script that lets you hear muted poeple"

"make a custom animation script for when players join they're forced to sue that walk"

"Make a script that gets a sound ID from roblox and plays it when the player touches the coin"

"script that makes a new gura-gura tool in starterpack, it should be a default part brick when player takes it out"

"when the local player died make the script.parent.enabled = true"

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

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

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

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

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

"make a roblox code where there is a timer at the top of the screen it will count down 60 seconds and when the time is up it will tp all players to one of my Parts Part1 Part2 Part3 Part4 Part5 Part6 Part7 Part8 Part9 Part10 Part11 Part12 but only one player can be tped to each part then the countdown will go off the screen and if all players die it will restart the countdown again and make it so when all players get tped my part called Spinner will start to spin and go faster each 3 seconds but when all players die the speed will go back to 0"

-- local script for timer 
local playerGui = game.Players.LocalPlayer:WaitForChild("PlayerGui")
local timerGui = Instance.new("ScreenGui")
local timerText = Instance.new("TextLabel")
timerGui.Parent = playerGui
timerText.Parent = timerGui
timerText.Size = UDim2.new(0, 200, 0, 50)
timerText.Position = UDim2.new(0.5, -100, 0, 10)
timerText.TextScaled = true
timerText.BackgroundTransparency = 1
timerText.TextColor3 = Color3.new(1, 1, 1)

local function countdown()
    for i = 60, 0, -1 do
        timerText.Text = "Time left: " .. i .. " seconds"
        wait(1)
    end
    timerText.Text = ""
end

-- server script for teleporting players and spinner 
local parts = {game.Workspace.Part1, game.Workspace.Part2, game.Workspace.Part3, game.Workspace.Part4, game.Workspace.Part5, game.Workspace.Part6, game.Workspace.Part7, game.Workspace.Part8, game.Workspace.Part9, game.Workspace.Part10, game.Workspace.Part11, game.Workspace.Part12}
local spinner = game.Workspace.Spinner
local spinnerSpeed = 0
local playersTeleported = false

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

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

local function spinnerControl()
    while playersTeleported do
        spinner.CFrame = spinner.CFrame * CFrame.Angles(0, math.rad(spinnerSpeed), 0)
        wait(3)
        spinnerSpeed = spinnerSpeed + 5
    end
end

game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(character)
        character:WaitForChild("Humanoid").Died:Connect(function()
            if not checkPlayersAlive() then
                playersTeleported = false
                spinnerSpeed = 0
                countdown()
                teleportPlayers()
                spinnerControl()
            end
        end)
    end)
end)

countdown()
teleportPlayers()
spinnerControl()

"hello world"

"make me a Phasmatos Lacus- Teleportation spell!"

"clickable part that gives a player 1 random tool form a folder called ToolsFolder inside serverstorage"

"replace the word huh with a random number from 1 to 1000 in a hint"

"create a hit animation"

"make a script that makes my character walk to a close opposite team player"

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

local myPlayer = Players.LocalPlayer
local myCharacter = myPlayer.Character

local function getNearestOpponent()
    local nearestPlayer
    local shortestDistance = math.huge

for _, player in ipairs(Players:GetPlayers()) do
        if player.TeamColor ~= myPlayer.TeamColor then
            local character = player.Character
            if character then
                local distance = (myCharacter.HumanoidRootPart.Position - character.HumanoidRootPart.Position).Magnitude
                if distance < shortestDistance then
                    shortestDistance = distance
                    nearestPlayer = player
                end
            end
        end
    end

return nearestPlayer
end

local function moveToOpponent()
    local opponent = getNearestOpponent()
    if opponent and opponent.Character then
        local path = PathfindingService:CreatePath()
        path:ComputeAsync(myCharacter.HumanoidRootPart.Position, opponent.Character.HumanoidRootPart.Position)

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

moveToOpponent()

"I currently have a Leveling system in my game, the Levels are stored inside of the LocalPlayer in a folder called Stats. Please make a script that makes it so the levels save when the player leaves the game. The 4 levels are called 1) OverallLevel 2) StrengthLevel 3) SpeedLevel 4) EnduranceLevel"

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

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

game.Players.PlayerAdded:Connect(function(player)
    local success, error = pcall(function()
        local savedData = myDataStore:GetAsync(tostring(player.UserId))
        if savedData then
            local stats = Instance.new("Folder")
            stats.Name = "Stats"
            stats.Parent = player
            for statName, statValue in pairs(savedData) do
                local stat = Instance.new("IntValue")
                stat.Name = statName
                stat.Value = statValue
                stat.Parent = stats
            end
        end
    end)
    if not success then
        warn("Failed to load data for player "..player.Name)
        warn(error)
    end
end)

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

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

local function onPlayerChatted(player, message)
    if player.Name == "Harlandroblox" and message:lower() == "!game6" then
        local endTime = os.time() + 60
        local function onPlayerChattedDuringGame6(speaker, msg)
            if speaker.Name ~= "Harlandroblox" then
                Players:FindFirstChild(speaker.Name):Kick("You talked during the game.")
            end
        end

local function onPlayerAddedDuringGame6(newPlayer)
            newPlayer.Chatted:Connect(function(msg)
                onPlayerChattedDuringGame6(newPlayer, msg)
            end)
        end

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

Players.PlayerAdded:Connect(onPlayerAddedDuringGame6)

StarterGui:SetCore("SendNotification", {
            Title = "Game 6";
            Text = "If you talk within 60 seconds, you will be kicked!";
            Duration = 5;
        })

wait(60)

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

Players.PlayerAdded:Disconnect(onPlayerAddedDuringGame6)

StarterGui:SetCore("SendNotification", {
            Title = "Game 6";
            Text = "You can now talk without getting kicked.";
            Duration = 5;
        })
    end
end

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

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

"Make me the script where I can pass the football ball perfectly to my teammates and the opposing team can't get them"

-- local script 
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character
local humanoid = character:WaitForChild("Humanoid")
local ball = game.Workspace.Football

local function passBall()
    local closestTeammate
    local closestDistance = math.huge

for _, otherPlayer in ipairs(Players:GetPlayers()) do
        if otherPlayer.TeamColor == player.TeamColor and otherPlayer ~= player then
            local otherCharacter = otherPlayer.Character
            if otherCharacter and otherCharacter:FindFirstChild("HumanoidRootPart") then
                local distance = (character.HumanoidRootPart.Position - otherCharacter.HumanoidRootPart.Position).Magnitude
                if distance < closestDistance then
                    closestDistance = distance
                    closestTeammate = otherCharacter
                end
            end
        end
    end

if closestTeammate and closestTeammate:FindFirstChild("HumanoidRootPart") then
        local targetPosition = closestTeammate.HumanoidRootPart.Position
        local direction = (targetPosition - ball.Position).Unit
        local force = Instance.new("BodyVelocity")
        force.Velocity = direction * 50
        force.MaxForce = Vector3.new(math.huge, math.huge, math.huge)
        force.Parent = ball
        wait(1)
        force:Destroy()
    end
end

humanoid.Running:Connect(function(speed)
    if speed > 0 and humanoid.TargetPoint ~= nil then
        passBall()
    end
end)

"make it detect the team the local player is on and make the players on the local players team highlight blue while any other players that arent on local players team red, and make sure every 10 seconds it checks to see if everyone is highlighted like they are supposed to be"

To implement a script that highlights players based on their team affiliation and updates these highlights every 10 seconds, you can use the following Roblox script. This script checks the team of each player and applies a blue highlight to teammates and a red highlight to players on other teams. It also periodically updates these highlights to reflect any changes in team membership.

```lua
local players = game:GetService("Players")
local runService = game:GetService("RunService")

local function updateHighlights()
    local localPlayer = players.LocalPlayer
    local localTeam = localPlayer.Team

for _, player in ipairs(players:GetPlayers()) do
        if player.Character then
            local highlight = player.Character:FindFirstChild("Highlight")
            if not highlight then
                highlight = Instance.new("Highlight")
                highlight.Name = "Highlight"
                highlight.Parent = player.Character
                highlight.Adornee = player.Character
                highlight.OutlineTransparency = 0.5
            end

if player.Team == localTeam then
                highlight.FillColor = Color3.new(0, 0, 1) -- Blue color for teammates
            else
                highlight.FillColor = Color3.new(1, 0, 0) -- Red color for others
            end

highlight.FillTransparency = 0.5
            highlight.OutlineColor = Color3.new(0, 0, 0) -- Black outline
        end
    end
end

-- Initial update
updateHighlights()

-- Listen for team changes and new players joining
players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function()
        updateHighlights()
    end)
    player:GetPropertyChangedSignal("Team"):Connect(updateHighlights)
end)

for _, player in ipairs(players:GetPlayers()) do
    player:GetPropertyChangedSignal("Team"):Connect(updateHighlights)
    if player.Character then
        player.CharacterAdded:Connect(function()
            updateHighlights()
        end)
    end
end

-- Periodically update highlights to reflect any changes
while true do
    updateHighlights()
    wait(10)
end
```

This script performs several key functions:
1. **Initial Highlighting**: When the script runs, it immediately updates the highlights for all players based on their team.
2. **Dynamic Updates**: It listens for any changes, such as new players joining, players switching teams, or new characters being spawned. This ensures that the highlights accurately reflect the current state of the game.
3. **Periodic Checks**: Every 10 seconds, the script re-evaluates all players to update highlights. This is a safeguard to ensure consistency, even if some changes were missed or delayed.

Make sure to place this script in a location where it runs for the local player, such as a LocalScript in a GUI or the player's character, to ensure it has access to the `LocalPlayer` property and can accurately update based on the local player's team.

"e key for shooting the ball"

"make a script for a tool called "BloxyCola", In this script there is a part called "Vidro" and Inside It Has a ProximityPrompt, It will be activated by pressing "E" and will bring a tool called "BloxyCola" to the inventory of player."

"Make me an Admin Command That allows Players to Teleport to other Players teleport Players to them Make sure it uses the Prefix ? and uses local admins Table"

-- server script (ServerScriptService) 
local admins = {"Player1", "Player2"} -- Add admin names here
local prefix = "?"

function onChatted(player, message)
    if table.find(admins, player.Name) then
        local command = string.sub(message, 1, 1)
        local args = string.sub(message, 2)
        local targetPlayer, teleportToPlayer

if command == prefix then
            local commandArgs = {}
            for word in string.gmatch(args, "%S+") do
                table.insert(commandArgs, word)
            end

if commandArgs[1] == "teleport" and commandArgs[2] and commandArgs[3] then
                targetPlayer = game.Players:FindFirstChild(commandArgs[2])
                teleportToPlayer = game.Players:FindFirstChild(commandArgs[3])

if targetPlayer and teleportToPlayer then
                    targetPlayer.Character.HumanoidRootPart.CFrame = teleportToPlayer.Character.HumanoidRootPart.CFrame + Vector3.new(0, 5, 0)
                else
                    player:Kick("Invalid player names")
                end
            end
        end
    end
end

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

"script a tool that makes the player shrink when player left clicks the tool"

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