Haddock - Roblox Library

"main menu gui with play and join friend button"

-- LocalScript inside the Play button 
local playButton = script.Parent
local mainMenu = playButton.Parent

local function onPlayButtonClicked()
    mainMenu.Visible = false
    -- Add any other actions you want to perform when the play button is clicked
end

playButton.MouseButton1Click:Connect(onPlayButtonClicked)

-- LocalScript inside the Join Friend button 
local joinFriendButton = script.Parent
local mainMenu = joinFriendButton.Parent
local friendUsernameBox = mainMenu.FriendUsernameBox -- Assuming there's a TextBox named FriendUsernameBox in the main menu

local function onJoinFriendButtonClicked()
    local friendUsername = friendUsernameBox.Text
    if friendUsername ~= "" then
        local success, message = pcall(function()
            game:GetService("TeleportService"):TeleportToPlaceInstance(game.PlaceId, game.Players:GetUserIdFromNameAsync(friendUsername))
        end)
        if not success then
            warn("Failed to join friend: " .. message)
        end
    else
        warn("Please enter a friend's username")
    end
end

joinFriendButton.MouseButton1Click:Connect(onJoinFriendButtonClicked)

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

"An architect made a scale drawing of a mall she is designing using a scale of 2 centimeters = 7.5 meters. In the drawing, the mall is 8.6 centimeters tall. How tall is the actual mall? Enter your answer as a decimal."

"Create a Realistic Dynamic TweenService and CFrame Camera script. The Camera rotates with the Vehicle on All Axis. The Camera mode is activated when seated."

"make it so instead of new instance parts it gets folder children and uses if child is basepart"

To modify the last example so that it operates on existing parts within a folder rather than creating new parts, you can iterate over the children of a specified folder. If a child is a `BasePart` (which includes `Part`, `WedgePart`, `MeshPart`, etc.), you can then assign a random quality value to it. Here's how you might adjust the script:

```lua
local folder = Instance.new("Folder", game.Workspace)
folder.Name = "QualitySettings"

local qualities = {"None", "Low", "Medium", "High", "Very High"}
for i, quality in ipairs(qualities) do
    local stringValue = Instance.new("StringValue", folder)
    stringValue.Name = quality
    stringValue.Value = quality
end

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

-- Assuming there's an existing folder named "Parts" in Workspace with parts in it
local partsFolder = game.Workspace:FindFirstChild("Parts")

if partsFolder then
    for i, child in ipairs(partsFolder:GetChildren()) do
        if child:IsA("BasePart") then  -- Check if the child is a BasePart
            local quality = getRandomQuality()
            local qualityValue = Instance.new("StringValue", child)
            qualityValue.Name = "Quality"
            qualityValue.Value = quality
        end
    end
else
    warn("Parts folder not found")
end
```

This script first checks if the "Parts" folder exists within the Workspace. If the folder exists, it iterates over each child within the folder. For each child that is a `BasePart`, it assigns a random quality from the predefined list by creating a `StringValue` on the part to store the quality level. If the "Parts" folder does not exist, it outputs a warning message. This approach allows you to dynamically assign properties to existing parts in the game environment without creating new instances.

"black and white background gui"

"GodMode"

"if a player touches a part called "Activation" then a part called "Gateway" deletes itself"

"Make me a anticheat system to stop people from flying with instructions on where to put it"

"Make a script that if the player presses f and he has more than 1 coin it will send the coins to the bag while if the bag value equals more than 1 it will send the value to the coins while if it equals 0 it will not change"

"Make me a Pushup System for Training Where the Player Gains Muscle From The Pushups and They Gain 10 Muscle Per Pushup as well as a stat multiplier system that will multiply the amount of Muscle they Gain From it With instructions on where to inse"

-- insert a folder named "Stats" in StarterPlayer.StarterPlayerScripts 
-- insert a script named "StatMultiplier" in the "Stats" folder 
local Players = game:GetService("Players")

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

local muscle = Instance.new("IntValue")
    muscle.Name = "Muscle"
    muscle.Value = 0
    muscle.Parent = stats

local multiplier = Instance.new("IntValue")
    multiplier.Name = "Multiplier"
    multiplier.Value = 1
    multiplier.Parent = stats
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- insert a script named "PushupSystem" in ServerScriptService 
local Players = game:GetService("Players")

local function onPlayerAdded(player)
    player.CharacterAdded:Connect(function(character)
        local humanoid = character:WaitForChild("Humanoid")
        humanoid.StateChanged:Connect(function(_, newState)
            if newState == Enum.HumanoidStateType.Swimming then
                local muscle = player.leaderstats.Muscle
                local multiplier = player.leaderstats.Multiplier
                muscle.Value = muscle.Value + (10 * multiplier.Value)
            end
        end)
    end)
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- To use this system, players should perform a push-up animation (similar to swimming) to gain muscle. You can create a GUI button to trigger the push-up animation.

"Create a Lua script for a magical ability in your game called "Ad Somnum." When the player presses the "I" key, it activates the ability, putting the targeted player character to sleep. and their will fall to the ground"

"make viva pinata"

Creating a full Viva Pinata game in Roblox would require a lot of work and is beyond the scope of this platform. However, I can help you get started with some basic concepts and scripts that you can use as a foundation for your game.

1. Create a garden area where players can plant seeds and grow plants.
2. Add pinata characters that can be attracted to the garden based on the types of plants grown.
3. Implement a system for players to "tame" pinatas by fulfilling certain requirements, such as feeding them specific plants.
4. Allow players to breed pinatas to create new species.

Here's a basic script to create a plant when a player clicks on a seed in their inventory:

```lua
-- Local Script inside the seed button
local seedButton = script.Parent
local player = game.Players.LocalPlayer
local planting = false

function plantSeed()
    if not planting then
        planting = true
        local plant = Instance.new("Part")
        plant.Size = Vector3.new(1, 1, 1)
        plant.BrickColor = BrickColor.new("Bright green")
        plant.Parent = game.Workspace
        plant.Position = player.Character.HumanoidRootPart.Position + Vector3.new(0, 0.5, 0)
        planting = false
    end
end

seedButton.MouseButton1Click:Connect(plantSeed)
```

For creating pinatas and attracting them to the garden, you can use the PathfindingService to make them move towards the garden when specific conditions are met. You can also create a system for taming and breeding pinatas by checking for specific requirements when players interact with them.

Creating a full Viva Pinata game would require a lot of time and effort, but with these basic concepts, you can start building your game and expand on it as you learn more about Roblox development.

"how to make a notepad thats send message for player when click in the text button"

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

"when the npc reaches waypoint 19, it is going back to waypoint 2 instead of going to waypoint 20"

-- server script 
local pfs = game:GetService("PathfindingService")
local dummy = script.Parent 
local waypoints = script.Parent.Parent.Parent.Waypoints:GetChildren() -- List of waypoints
local aggroRange = 10 -- define the aggro range
local aggroedPlayers = {} -- table to hold players in aggro range
local currentWaypointIndex = 1

-- Order waypoints by name (which should be numbers)
table.sort(waypoints, function(a, b) return a.Name < b.Name end)

-- Function to check for players in aggro range
local function checkAggro()
	for _, player in pairs(game.Players:GetPlayers()) do
		if (player.Character.HumanoidRootPart.Position - dummy.HumanoidRootPart.Position).Magnitude < aggroRange then
			aggroedPlayers[player.Name] = player
		else
			aggroedPlayers[player.Name] = nil
		end
	end
end

-- Function to move to the next waypoint
local function moveToNextWaypoint()
	while true do
		if currentWaypointIndex == 19 then
			currentWaypointIndex = 20
		else
			currentWaypointIndex = (currentWaypointIndex % #waypoints) + 1
		end
		print("Moving to waypoint: " .. waypoints[currentWaypointIndex].Name .. " at position: " .. tostring(waypoints[currentWaypointIndex].Position)) -- log the next waypoint
		local path = pfs:CreatePath()
		path:ComputeAsync(dummy.HumanoidRootPart.Position, waypoints[currentWaypointIndex].Position)
		for _, waypoint in pairs(path:GetWaypoints()) do
			dummy.Humanoid:MoveTo(waypoint.Position)
			dummy.Humanoid.MoveToFinished:Wait()
		end
		checkAggro() -- check for players in aggro range
		if next(aggroedPlayers) ~= nil then -- if the aggroedPlayers table is not empty, pursue the nearest player
			local nearestPlayer = nil
			local nearestDist = math.huge
			for _, player in pairs(aggroedPlayers) do
				local dist = (player.Character.HumanoidRootPart.Position - dummy.HumanoidRootPart.Position).Magnitude
				if dist < nearestDist then
					nearestDist = dist
					nearestPlayer = player
				end
			end
			if nearestPlayer then
				dummy.Humanoid:MoveTo(nearestPlayer.Character.HumanoidRootPart.Position)
				dummy.Humanoid.MoveToFinished:Wait()
			end
		end
		task.wait(1)
	end
end

-- Start the NPC's behavior
spawn(moveToNextWaypoint)

"create a text button that lets you choose a button"

"make a control script so players can only move on one axis"

"make a roblox script for a leaderboard on my Part called leee what shows who has the most leaderstat called Robux"

-- server script 
local leaderboardPart = game.Workspace.leee
local surfaceGui = Instance.new("SurfaceGui")
surfaceGui.Parent = leaderboardPart
surfaceGui.Adornee = leaderboardPart
local textLabel = Instance.new("TextLabel")
textLabel.Parent = surfaceGui
textLabel.Size = UDim2.new(1, 0, 1, 0)
textLabel.TextScaled = true
textLabel.BackgroundTransparency = 1
textLabel.TextColor3 = Color3.fromRGB(255, 255, 255)

local function updateLeaderboard()
    local players = game:GetService("Players"):GetPlayers()
    table.sort(players, function(a, b)
        return a.leaderstats.Robux.Value > b.leaderstats.Robux.Value
    end)

local leaderboardText = "Leaderboard:\n\n"
    for i, player in ipairs(players) do
        leaderboardText = leaderboardText .. i .. ". " .. player.Name .. " - " .. player.leaderstats.Robux.Value .. "\n"
    end
    textLabel.Text = leaderboardText
end

game:GetService("Players").PlayerAdded:Connect(function(player)
    player.ChildAdded:Connect(function(child)
        if child.Name == "leaderstats" then
            child.Robux.Changed:Connect(updateLeaderboard)
        end
    end)
end)

updateLeaderboard()

"Create a system for a random player model generator that randomly assigns a male or female character model when players spawn."

"create a new folder called currency inside the player with a string value called souls and save when player leaves game."

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

game.Players.PlayerAdded:Connect(function(player)
    local currencyFolder = Instance.new("Folder")
    currencyFolder.Name = "Currency"
    currencyFolder.Parent = player
    
    local souls = Instance.new("StringValue")
    souls.Name = "Souls"
    souls.Parent = currencyFolder
    
    local savedData
    local success, err = pcall(function()
        savedData = currencyDataStore:GetAsync(player.UserId .. "-Souls")
    end)
    
    if success and savedData then
        souls.Value = savedData
    else
        souls.Value = 0
    end
end)

game.Players.PlayerRemoving:Connect(function(player)
    local currencyFolder = player:FindFirstChild("Currency")
    if currencyFolder then
        local souls = currencyFolder:FindFirstChild("Souls")
        if souls then
            local success, err = pcall(function()
                currencyDataStore:SetAsync(player.UserId .. "-Souls", souls.Value)
            end)
            
            if not success then
                warn("Failed to save data for " .. player.Name)
            end
        end
    end
end)

"make a block eating simulator script that bring all parts to the character. Make it loop and the parts have a folder and the parts are in the folder the parts names are SmallBlock."

"proximity prompt script"

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

"add to the script you just generated by making it that the buttons are not stacked up in one place, but if multiple players make their own party, each party tab will be under eachother and at some point, a working scrolling frame is added"

-- Add this to your existing script to create a scrolling frame for party tabs

-- Assuming you have a ScreenGui called "ScreenGui" and a Frame called "PartyFrame" inside it
local screenGui = game.Players.LocalPlayer.PlayerGui.ScreenGui
local partyFrame = screenGui.PartyFrame

-- Create a scrolling frame inside the PartyFrame
local scrollingFrame = Instance.new("ScrollingFrame")
scrollingFrame.Size = UDim2.new(1, 0, 1, 0)
scrollingFrame.CanvasSize = UDim2.new(0, 0, 0, 0)
scrollingFrame.ScrollBarThickness = 5
scrollingFrame.Parent = partyFrame

-- Function to add a party tab to the scrolling frame
local function addPartyTab(partyName)
    local numTabs = #scrollingFrame:GetChildren()
    local tabHeight = 50

-- Create a new TextButton for the party tab
    local partyTab = Instance.new("TextButton")
    partyTab.Size = UDim2.new(1, 0, 0, tabHeight)
    partyTab.Position = UDim2.new(0, 0, 0, numTabs * tabHeight)
    partyTab.Text = partyName
    partyTab.Parent = scrollingFrame

-- Update the CanvasSize of the scrolling frame
    scrollingFrame.CanvasSize = UDim2.new(0, 0, 0, (numTabs + 1) * tabHeight)
end

-- Example usage: addPartyTab("Party 1")
-- Call this function whenever a new party is created to add a new tab to the scrolling frame

"make a clientsided floating arrow that floats above the player's next stage. Stages are in a folder called Checkpoints"

-- LocalScript in StarterPlayerScripts 
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local checkpointsFolder = game.Workspace.Checkpoints
local arrow = Instance.new("BillboardGui")
local arrowImage = Instance.new("ImageLabel")

arrowImage.Image = "rbxassetid://arrow_image_asset_id_here"
arrowImage.Size = UDim2.new(0, 50, 0, 50)
arrowImage.BackgroundTransparency = 1
arrowImage.Parent = arrow

arrow.Enabled = true
arrow.Size = UDim2.new(0, 50, 0, 50)
arrow.StudsOffset = Vector3.new(0, 3, 0)
arrow.Adornee = nil
arrow.Parent = character:WaitForChild("Head")

local currentStage = 1

local function updateArrow()
	local nextCheckpoint = checkpointsFolder:FindFirstChild("Stage" .. tostring(currentStage + 1))
	if nextCheckpoint then
		arrow.Adornee = nextCheckpoint
	else
		arrow.Enabled = false
	end
end

local function onCheckpointTouched(hit)
	local character = hit.Parent
	local humanoid = character:FindFirstChildWhichIsA("Humanoid")
	if humanoid and character == player.Character then
		if hit.Name == "Stage" .. tostring(currentStage) then
			currentStage = currentStage + 1
			updateArrow()
		end
	end
end

for _, checkpoint in ipairs(checkpointsFolder:GetChildren()) do
	if checkpoint:IsA("BasePart") then
		checkpoint.Touched:Connect(onCheckpointTouched)
	end
end

updateArrow()

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

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

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

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

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

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

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

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

local function onPlayerRemoving(player)
    saveData(player)
end

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

"create a script that gives a slime popping particle when NPC is dead. use a random slime popping particle ID."

"knife with swing"

"script a text button that opens a frame"

"When the player dies, the camera will stop following them. How can we fix this?"

"I need to create a level system but instead of gaining a level you will gain a star (A GUI) located in starterplayerscripts.Stars.StarFrame.Star1. you will gain this star when a player reaches 1000 exp (I already have a leaderstats) I just need the script that makes the star should up when exp gaine"

"if npc get closer to the light the light will start to flicker"

"Make a enemy pathfinding script and make it advanced so it can move around walls and give it animation"

"make an event that removes all players hats, gives all players in the server 2 accessories from replicatedstorage for 60 seconds, and give them their original hats back after the 60 seconds. add detailed instructions and comments."

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

local accessories = ReplicatedStorage.Accessories:GetChildren()

local function getRandomAccessory()
    local index = math.random(1, #accessories)
    return accessories[index]:Clone()
end

local function removeAllHats(player)
    local character = player.Character
    if character then
        local hats = {}
        for _, accessory in ipairs(character:GetChildren()) do
            if accessory:IsA("Accessory") then
                table.insert(hats, accessory)
                accessory:Destroy()
            end
        end
        return hats
    end
end

local function giveAccessories(player, originalHats)
    local character = player.Character
    if character then
        local newAccessories = {getRandomAccessory(), getRandomAccessory()}
        for _, accessory in ipairs(newAccessories) do
            accessory.Parent = character
        end
        wait(60)
        for _, accessory in ipairs(newAccessories) do
            accessory:Destroy()
        end
        for _, hat in ipairs(originalHats) do
            hat.Parent = character
        end
    end
end

local function onAccessoryEvent()
    for _, player in ipairs(Players:GetPlayers()) do
        local originalHats = removeAllHats(player)
        giveAccessories(player, originalHats)
    end
end

game.ReplicatedStorage.AccessoryEvent.OnServerEvent:Connect(onAccessoryEvent)

-- create a RemoteEvent named "AccessoryEvent" in ReplicatedStorage

"Make a script so when I click, every part close to my mousebutton is pushed away like a Star Wars Force Push."

"Create leaderstat with speed Red Orbs Blue Orbs Black Orbs"

"Make me a Combat System that plays 4 Different animations where if the player m1s once it plays animation 1 so and so and if it hits another Player/NPC it will damage them make sure to add hitbox and cd with instructions on how to set up"

-- local script for player animations and combat system 
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local mouse = player:GetMouse()

local animations = {
    "Animation1ID",
    "Animation2ID",
    "Animation3ID",
    "Animation4ID"
}

local currentAnimation = 1
local attackCooldown = 1
local lastAttack = 0
local hitboxSize = Vector3.new(5, 5, 5)

local function playAnimation(animationID)
    local animation = Instance.new("Animation")
    animation.AnimationId = "rbxassetid://" .. animationID
    local animationTrack = humanoid:LoadAnimation(animation)
    animationTrack:Play()
end

local function attack()
    if tick() - lastAttack > attackCooldown then
        lastAttack = tick()
        playAnimation(animations[currentAnimation])

local hitbox = Instance.new("Part")
        hitbox.Size = hitboxSize
        hitbox.Position = character.HumanoidRootPart.Position + character.HumanoidRootPart.CFrame.lookVector * (hitboxSize.X / 2)
        hitbox.Anchored = true
        hitbox.CanCollide = false
        hitbox.Transparency = 1
        hitbox.Parent = workspace

local touchedConnection
        touchedConnection = hitbox.Touched:Connect(function(hit)
            local hitCharacter = hit.Parent
            local hitHumanoid = hitCharacter:FindFirstChildWhichIsA("Humanoid")
            if hitHumanoid and hitCharacter ~= character then
                hitHumanoid.Health = hitHumanoid.Health - 10
            end
        end)

wait(0.1)
        touchedConnection:Disconnect()
        hitbox:Destroy()

currentAnimation = currentAnimation + 1
        if currentAnimation > #animations then
            currentAnimation = 1
        end
    end
end

mouse.Button1Down:Connect(attack)

-- Instructions for setting up in Roblox:
1. Replace "Animation1ID", "Animation2ID", "Animation3ID", and "Animation4ID" with the actual Roblox animation IDs.
2. Place this script inside a LocalScript in the StarterPlayerScripts folder.
3. Make sure the player's character has a Humanoid and HumanoidRootPart.
4. Customize the attackCooldown and hitboxSize variables as desired.

"script for a part to make it grow bigger and smaller in increments of 5 seconds. add detailed comments"

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

"make a script for leaderstats called Money"

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

"Create a script that changes a parts color every second"

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

"Workspace.Teleport Pads.Script:5: attempt to index nil with 'leaderstats'"

Sorry for the confusion, the error means that 'leaderstats' does not exist for the player. This could be because the player does not have a leaderstats value or it has not been initialized yet. Here's a corrected version:

```lua
local player = game.Players.LocalPlayer

-- Check if player has leaderstats
if player:FindFirstChild("leaderstats") then
    local rebirths = player.leaderstats.Rebirths
    local pad1 = game.Workspace.Pad1
    local pad2 = game.Workspace.Pad2

local function teleport(character, destination)
        character:MoveTo(destination.Position)
    end

pad1.Touched:Connect(function(hit)
        local character = hit.Parent:FindFirstChild("Humanoid")
        if character and rebirths.Value >= 3 then
            teleport(character, pad2)
        end
    end)

pad2.Touched:Connect(function(hit)
        local character = hit.Parent:FindFirstChild("Humanoid")
        if character then
            teleport(character, pad1)
        end
    end)
else
    print("Player does not have leaderstats")
end
```
This script checks if the player has 'leaderstats' before trying to access it. If 'leaderstats' does not exist, it prints a message to the console.

"Invisible wall"

"every second game idea"

"make them move"

"make a roblox lua script that makes it so whatever you look at and if the player presses shift c they can copy that object and paste it with shift v basicaly a copy paste script"

"If I click this button then I explode"

"create an advanced randomized server sided game generator script for Roblox."

-- server script

-- Create a table of possible game objects
local gameObjects = {
    "Part",
    "Model",
    "Script",
    "Sound",
    "Mesh"
}

-- Create a table of possible game object properties
local gameObjectProperties = {
    "Name",
    "Position",
    "Rotation",
    "Size",
    "Color",
    "Transparency",
    "Anchored",
    "Locked",
    "CanCollide"
}

-- Create a table of possible game object values
local gameObjectValues = {
    "MyObject",
    Vector3.new(0, 0, 0),
    Vector3.new(0, 0, 0),
    Vector3.new(1, 1, 1),
    Color3.new(1, 0, 0),
    0,
    true,
    false,
    true
}

-- Function to create a random game object
function CreateRandomGameObject()
    -- Pick a random object type
    local randomObjectType = gameObjects[math.random(#gameObjects)]
    -- Create the object
    local object = Instance.new(randomObjectType)
    -- Set the object's properties
    for _, property in pairs(gameObjectProperties) do
        -- Pick a random value
        local randomValue = gameObjectValues[math.random(#gameObjectValues)]
        -- Set the property
        object[property] = randomValue
    end
    -- Return the object
    return object
end

-- Create a random game object every 5 seconds
while true do
    local randomObject = CreateRandomGameObject()
    randomObject.Parent = game.Workspace
    wait(5)
end

"Make a script that says "Hello" whenever a player presses the H on the keyboard."

"a text button when pressed it fires but its free local MPS = game:GetService("MarketplaceService") button.MouseButton1Down:connect(function() MPS:PromptProductPurchase(Player,devProductID) game.ReplicatedStorage:FindFirstChild("RerollEvent"):FireServer(Player) end) local DSS = game"

"create a Field of Battle roblox script that allows you to get legendary gems and gold that has its own custom gui with sliders that have the max capacity of 100000 for each"

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

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

local titleLabel = Instance.new("TextLabel", background)
titleLabel.Text = "Field of Battle - Legendary Gems & Gold"
titleLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
titleLabel.BackgroundColor3 = Color3.fromRGB(0, 0, 0)

local gemSlider = Instance.new("Slider", background)
gemSlider.Value = 0
gemSlider.MaxValue = 100000
gemSlider.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
gemSlider.UICorner = 5

local goldSlider = Instance.new("Slider", background)
goldSlider.Value = 0
goldSlider.MaxValue = 100000
goldSlider.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
goldSlider.UICorner = 5

local function updateGems()
    local gems = math.floor(gemSlider.Value)
    player.leaderstats.Gems.Value = gems
end

local function updateGold()
    local gold = math.floor(goldSlider.Value)
    player.leaderstats.Gold.Value = gold
end

gemSlider.Changed:Connect(updateGems)
goldSlider.Changed:Connect(updateGold)

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

"make a time settings menu with 2 options with one being a toggle for turning on or off current os time to time in game with the other being a fogend toggler from low to higher and can be opened and closed with the main button on the top right of the screen also add functionality for each setting"

```lua
-- local script (StarterGUI) 
local player = game.Players.LocalPlayer
local screenGui = Instance.new("ScreenGui", player.PlayerGui)
local settingsMenu = Instance.new("Frame", screenGui)
settingsMenu.Position = UDim2.new(0.75, 0, 0.1, 0)
settingsMenu.Size = UDim2.new(0.2, 0, 0.8, 0)
settingsMenu.BackgroundColor3 = Color3.fromRGB(100, 100, 100)
settingsMenu.Visible = false

local openSettingsButton = Instance.new("TextButton", screenGui)
openSettingsButton.Position = UDim2.new(0.95, 0, 0, 0)
openSettingsButton.Size = UDim2.new(0.05, 0, 0.05, 0)
openSettingsButton.Text = "Settings"
openSettingsButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)

local osTimeToggle = Instance.new("TextButton", settingsMenu)
osTimeToggle.Position = UDim2.new(0.1, 0, 0.1, 0)
osTimeToggle.Size = UDim2.new(0.8, 0, 0.1, 0)
osTimeToggle.Text = "OS Time: Off"
osTimeToggle.BackgroundColor3 = Color3.fromRGB(200, 200, 200)

local fogEndSlider = Instance.new("TextBox", settingsMenu)
fogEndSlider.Position = UDim2.new(0.1, 0, 0.3, 0)
fogEndSlider.Size = UDim2.new(0.8, 0, 0.1, 0)
fogEndSlider.Text = "Fog End: 100"
fogEndSlider.BackgroundColor3 = Color3.fromRGB(200, 200, 200)

-- Toggle Settings Menu 
openSettingsButton.MouseButton1Click:Connect(function()
    settingsMenu.Visible = not settingsMenu.Visible
end)

-- OS Time Toggle Functionality 
osTimeToggle.MouseButton1Click:Connect(function()
    if osTimeToggle.Text == "OS Time: Off" then
        osTimeToggle.Text = "OS Time: On"
        game.Lighting.TimeOfDay = os.date("!%H:%M:%S") -- Sets the in-game time to the current OS time
    else
        osTimeToggle.Text = "OS Time: Off"
        game.Lighting.TimeOfDay = "14:00:00" -- Resets to a default time
    end
end)

-- Fog End Slider Functionality 
fogEndSlider.FocusLost:Connect(function(enterPressed)
    if enterPressed then
        local newFogEnd = tonumber(fogEndSlider.Text:match("%d+"))
        if newFogEnd then
            game.Lighting.FogEnd = newFogEnd
        else
            fogEndSlider.Text = "Invalid Input"
        end
    end
end)
```

This script creates a simple time settings menu with a toggle for syncing the game's time with the OS time and a textbox to adjust the fog end distance. The settings menu can be opened and closed using a button located at the top right of the screen.

"change the seconds for frames"

"make a afk script everytime the player exits the tab"

"create a gui in screen gui that is blur when its opned"

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

"create a daily reward system that has a frame and has multiple button inside of it. instruction on how to set it up."

-- LocalScript inside the Frame 
local player = game.Players.LocalPlayer
local dailyRewards = script.Parent
local buttons = dailyRewards:GetChildren()
local rewardClaimed = false

local function claimReward(button)
    if not rewardClaimed then
        rewardClaimed = true
        local rewardAmount = tonumber(button.Name)
        player.leaderstats.Coins.Value = player.leaderstats.Coins.Value + rewardAmount
        button.Text = "Claimed"
        button.BackgroundColor3 = Color3.fromRGB(150, 150, 150)
        wait(86400) -- 24 hours in seconds
        rewardClaimed = false
        button.Text = "Claim"
        button.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
    end
end

for _, button in ipairs(buttons) do
    if button:IsA("TextButton") then
        button.MouseButton1Click:Connect(function()
            claimReward(button)
        end)
    end
end

-- Instructions 
1. Create a ScreenGui inside StarterGui.
2. Inside the ScreenGui, create a Frame.
3. Inside the Frame, create multiple TextButtons with the reward amount as their name (e.g., "100", "200", "300").
4. Place the above LocalScript inside the Frame.
5. Make sure the player has a leaderstats value named "Coins" in their Player object.
6. Customize the appearance of the Frame and TextButtons as desired.
7. Test the game and click on the buttons to claim daily rewards.

"teleport part on touch"

"make a level system using falling parts use gui also make the part dissapear when touched and make the part give exp"

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

"create a loot system system that shows a loot gui when players receive the item"

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

"Make a event system like survive the disasaters but it modifies parts and adds effects to them also only use messages and hints"

-- Server script for event system 
local disasterList = {"Fire", "Flood", "Earthquake"}
local disasterEffects = {
    Fire = function(part)
        local fire = Instance.new("Fire")
        fire.Parent = part
    end,
    Flood = function(part)
        part.BrickColor = BrickColor.new("Bright blue")
    end,
    Earthquake = function(part)
        part.Anchored = false
    end
}

local function startDisaster()
    local disaster = disasterList[math.random(1, #disasterList)]
    game:GetService("StarterGui"):SetCore("SendNotification", {
        Title = "Disaster Incoming!";
        Text = "Prepare for "..disaster.."!";
        Duration = 5;
    })
    wait(5)
    for _, part in pairs(game.Workspace:GetChildren()) do
        if part:IsA("Part") then
            disasterEffects[disaster](part)
        end
    end
    game:GetService("StarterGui"):SetCore("SendNotification", {
        Title = "Disaster!";
        Text = disaster.." has started!";
        Duration = 5;
    })
    wait(30)
    for _, part in pairs(game.Workspace:GetChildren()) do
        if part:IsA("Part") then
            if disaster == "Fire" then
                part.Fire:Destroy()
            elseif disaster == "Flood" then
                part.BrickColor = BrickColor.new("Grey")
            elseif disaster == "Earthquake" then
                part.Anchored = true
            end
        end
    end
    game:GetService("StarterGui"):SetCore("SendNotification", {
        Title = "Disaster Over!";
        Text = disaster.." has ended!";
        Duration = 5;
    })
end

while true do
    startDisaster()
    wait(60)
end

"give the player 5 coins when their stage value 1"

"Make me a script where my camera locks on another players movement when pressing the keybind z. Then when the camera is locked on that player Im able to use the key binds g and f to make the camera angle go up and down. G to go down f to go up"

-- local script 
local UserInputService = game:GetService("UserInputService")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local camera = game.Workspace.CurrentCamera
local lockedOn = false
local targetPlayer

local function lockCamera(playerToLock)
    local character = playerToLock.Character
    if character and character:FindFirstChild("HumanoidRootPart") then
        camera.CameraSubject = character.HumanoidRootPart
        lockedOn = true
    end
end

local function unlockCamera()
    camera.CameraSubject = player.Character.Humanoid
    lockedOn = false
end

local function adjustCameraAngle(input)
    if lockedOn and input.KeyCode == Enum.KeyCode.F then
        camera.CFrame = camera.CFrame * CFrame.Angles(math.rad(5), 0, 0)
    elseif lockedOn and input.KeyCode == Enum.KeyCode.G then
        camera.CFrame = camera.CFrame * CFrame.Angles(math.rad(-5), 0, 0)
    end
end

UserInputService.InputBegan:Connect(function(input, gameProcessed)
    if input.KeyCode == Enum.KeyCode.Z and not gameProcessed then
        if not lockedOn then
            for _, otherPlayer in ipairs(Players:GetPlayers()) do
                if otherPlayer ~= player then
                    targetPlayer = otherPlayer
                    lockCamera(targetPlayer)
                    break
                end
            end
        else
            unlockCamera()
        end
    elseif lockedOn and (input.KeyCode == Enum.KeyCode.F or input.KeyCode == Enum.KeyCode.G) then
        adjustCameraAngle(input)
    end
end)

"Noclip"

-- local script 
local player = game.Players.LocalPlayer
local character = player.Character
local humanoid = character:WaitForChild("Humanoid")
local noclip = false

local function noclipToggle()
    if noclip then
        noclip = false
        humanoid.WalkSpeed = 16
    else
        noclip = true
        humanoid.WalkSpeed = 50
    end
end

game:GetService("UserInputService").InputBegan:Connect(function(inputObject, gameProcessedEvent)
    if inputObject.KeyCode == Enum.KeyCode.LeftShift then
        noclipToggle()
    end
end)
-- make a door open when a player walks up to it 
-- put this script under the part you want to open 
local part = script.Parent
local door = game.Workspace.Door
local canOpen = true
 
local function openDoor(otherPart)
   local partParent = otherPart.Parent
   local humanoid = partParent:FindFirstChildWhichIsA('Humanoid')
   if humanoid and canOpen then
       canOpen = false
       door.Position = door.Position + Vector3.new(0,12,0)
       wait(3)
       door.Position = door.Position + Vector3.new(0,-12,0)
       canOpen = true
   end
end
 
part.Touched:Connect(openDoor)

"make it so that when the script.parent is touched new instance image label with the image ID and position and size"

"make the text more visible and make the text white as well"

"npc that follows closest player walk animation and tell me where script goes"

Here's a script for an NPC that follows the closest player using walk animation. This script should be placed in a Server Script under the NPC model.

```lua
local NPC = script.Parent
local humanoid = NPC.Humanoid
local walkAnim = Instance.new("Animation")
walkAnim.AnimationId = "rbxassetid://YourAnimationIDHere" -- Replace with your walk animation ID
local walkTrack = humanoid:LoadAnimation(walkAnim)

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

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

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

return closestPlayer
end

while true do
    local closestPlayer = findClosestPlayer()

if closestPlayer then
        local character = closestPlayer.Character
        if character then
            local path = PathfindingService:CreatePath()
            path:ComputeAsync(NPC.HumanoidRootPart.Position, character.HumanoidRootPart.Position)

local waypoints = path:GetWaypoints()
            for _, waypoint in ipairs(waypoints) do
                humanoid:MoveTo(waypoint.Position)
                walkTrack:Play()
                humanoid.MoveToFinished:Wait()
            end
        end
    end

wait(1)
end
```

Make sure to replace "YourAnimationIDHere" with the actual ID of your walk animation.

"make a chatbot with an npc using chatgpt api."

-- Unfortunately, using external APIs like ChatGPT is not allowed in Roblox due to security reasons. However, you can create a simple chatbot using pre-defined responses.

-- Server Script
local npc = game.Workspace.NPC
local chatResponses = {
    ["hello"] = "Hello there!",
    ["how are you"] = "I'm doing well, thank you!",
    ["bye"] = "Goodbye! Have a great day!"
}

local function onChatted(player, message)
    local lowerMessage = string.lower(message)
    local response = chatResponses[lowerMessage]
    if response then
        npc.Head.Chat:FireClient(player, response)
    else
        npc.Head.Chat:FireClient(player, "I'm not sure how to respond to that.")
    end
end

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

-- Local Script (inside NPC.Head)
local chatEvent = script.Parent.Chat
local chat = game:GetService("Chat")

chatEvent.OnClientEvent:Connect(function(player, message)
    chat:Chat(script.Parent.Parent, message, Enum.ChatColor.Blue)
end)

"create a roblox script that when executed puts a hint that says Threat detected, Threat: VIEWPORTframe Action:Fast Remove then delete all scripts and all remote events"

Creating a script that puts a hint, deletes all scripts, and all remote events can be a dangerous operation, as it can disrupt the game's functionality. However, for educational purposes, here is an example of how you might achieve this in a Roblox game using server-side scripting. Please use this script with caution and only in a controlled environment.

```lua
-- Server script
local function removeAllScriptsAndRemoteEvents()
    -- Function to recursively remove all scripts and remote events from a given instance
    local function removeScriptsAndRemotes(instance)
        for _, child in ipairs(instance:GetChildren()) do
            if child:IsA("Script") or child:IsA("LocalScript") or child:IsA("ModuleScript") or child:IsA("RemoteEvent") or child:IsA("RemoteFunction") then
                child:Destroy()
            else
                removeScriptsAndRemotes(child) -- Recursive call for all children
            end
        end
    end

-- Call the function for the entire game
    removeScriptsAndRemotes(game)
end

-- Create a hint to notify players
local hint = Instance.new("Hint", game.Workspace)
hint.Text = "Threat detected, Threat: VIEWPORTframe Action: Fast Remove"

-- Wait a moment for players to see the hint
wait(5)

-- Execute the removal function
removeAllScriptsAndRemoteEvents()

-- Delete the hint
hint:Destroy()
```

This script will create a hint in the Workspace, wait for 5 seconds, and then proceed to delete all scripts and remote events in the game. It is important to note that this script will not discriminate and will remove all scripts and remote events, which can break your game.

**WARNING**: Running this script in a live game or any game with important content can result in loss of functionality and potentially break the game. Always test scripts in a safe, isolated environment and ensure you have backups of your game before running potentially destructive scripts.

"make the humanoid jump normal when presssing spacebar once but in the the air press spacebar again with custom animation make the humanoid jump again also give it a small boost to make it look like they'e juming again"

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

local function onJumpRequest()
    if not isJumping then
        humanoid.Jump = true
        isJumping = true
    elseif not doubleJumped then
        local animation = Instance.new("Animation")
        animation.AnimationId = "rbxassetid://YourAnimationIDHere"
        local animTrack = humanoid:LoadAnimation(animation)
        animTrack:Play()
        humanoid.JumpPower = 70
        humanoid.Jump = true
        doubleJumped = true
    end
end

local function onJumpEnded()
    if isJumping then
        isJumping = false
    elseif doubleJumped then
        doubleJumped = false
        humanoid.JumpPower = 50
    end
end

UserInputService.JumpRequest:Connect(onJumpRequest)
humanoid.StateChanged:Connect(function(oldState, newState)
    if newState == Enum.HumanoidStateType.Landed then
        onJumpEnded()
    end
end)

"can you give it like an animation to like opening and closing"

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

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

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

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

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

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

"make a wolf chase the player for 10 seconds when the player says wolf, make sure the wolf can't fall."

-- server script 
local wolf = game.Workspace.Wolf
local pfs = game:GetService("PathfindingService")
local players = game:GetService("Players")

local function chasePlayer(player, duration)
    local character = player.Character
    if character then
        local humanoidRootPart = character:FindFirstChild("HumanoidRootPart")
        if humanoidRootPart then
            local path = pfs:CreatePath()
            path:ComputeAsync(wolf.HumanoidRootPart.Position, humanoidRootPart.Position)
            local waypoints = path:GetWaypoints()
            for _, waypoint in ipairs(waypoints) do
                wolf.Humanoid:MoveTo(waypoint.Position)
                wolf.Humanoid.MoveToFinished:Wait()
            end
            wait(duration)
            wolf.Humanoid:MoveTo(wolf.HumanoidRootPart.Position)
        end
    end
end

local function onChatted(player, message)
    if message:lower() == "wolf" then
        chasePlayer(player, 10)
    end
end

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

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

-- script for wolf 
local wolf = script.Parent
wolf.Humanoid.PlatformStand = true

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

"when player walk on a part speed and when is not touch to not have speed"

"Create a 3d image of the players tools in the players backpack"

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

"create a mining system where if player hits asphalt the asphalt will dig and will be give a random item from a list of ids from another script, create a backpack gui, open gui if player clicks the button on the left open backpack, script with details"

I'll break this down into multiple parts: creating the mining system, creating the backpack GUI, and creating the button to open the backpack.

1. Mining System:
-- Server script for the mining system
local asphalt = game.Workspace.Asphalt
local randomItems = require(game.ServerScriptService.RandomItems) -- Assuming you have a script named RandomItems in ServerScriptService

local function mine(hit)
    local player = game.Players:FindFirstChild(hit.Parent.Name)
    if player then
        asphalt:Destroy()
        local randomItem = randomItems[math.random(1, #randomItems)]
        player.Backpack.Items:Fire(randomItem) -- Assuming you have a RemoteEvent named Items in the player's Backpack
    end
end

asphalt.Touched:Connect(mine)

-- RandomItems script in ServerScriptService
return {
    "Item1",
    "Item2",
    "Item3",
    -- Add more item IDs here
}

2. Backpack GUI:
-- Local script for creating the Backpack GUI
local Player = game:GetService("Players").LocalPlayer
local Backpack = Instance.new("ScreenGui", Player.PlayerGui)
Backpack.Name = "Backpack"

local Frame = Instance.new("Frame", Backpack)
Frame.Size = UDim2.new(0.3, 0, 0.5, 0)
Frame.Position = UDim2.new(0.35, 0, 0.25, 0)
Frame.Visible = false

local function onItemsReceived(item)
    local TextLabel = Instance.new("TextLabel", Frame)
    TextLabel.Text = item
    TextLabel.Size = UDim2.new(1, 0, 0, 30)
    TextLabel.Position = UDim2.new(0, 0, #Frame:GetChildren() * 30, 0)
end

Player.Backpack.Items.OnClientEvent:Connect(onItemsReceived)

3. Button to open the Backpack:
-- Local script for creating the button to open the Backpack
local Player = game:GetService("Players").LocalPlayer
local BackpackButton = Instance.new("TextButton", Player.PlayerGui.Backpack)
BackpackButton.Name = "BackpackButton"
BackpackButton.Text = "Open Backpack"
BackpackButton.Size = UDim2.new(0.1, 0, 0.05, 0)
BackpackButton.Position = UDim2.new(0, 10, 0, 10)

local function toggleBackpack()
    local Frame = Player.PlayerGui.Backpack.Frame
    Frame.Visible = not Frame.Visible
end

BackpackButton.MouseButton1Click:Connect(toggleBackpack)

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

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

"Lights to flicker when monster is nearby"

"Create a script that keeps a part on the tracks. But instead of the part moving to the exact CFrame of the tracks the part can still move through it with constraints like a ski lift or a zipline."

"make a script where you get tped to one of my parts Part1 Part2 Part3 Part4 Part5 Part6 Part7 Part8 Part9 when you do it will ask you a question at the top of the screen the question is what does Harland want to be when he is older then there is a gui at the bottom of your screen and you can input awnsers if you say dev then whatever part you get tped to 3 of my parts called bbl will go ontop of eachother and the player will be tped ontop of them my part called bbl is in ReplicatedStorage"

-- local script 
local Player = game:GetService('Players').LocalPlayer
local ReplicatedStorage = game:GetService('ReplicatedStorage')
local bbl = ReplicatedStorage:WaitForChild('bbl')

local function teleportToRandomPart()
    local parts = {'Part1', 'Part2', 'Part3', 'Part4', 'Part5', 'Part6', 'Part7', 'Part8', 'Part9'}
    local randomPart = game.Workspace[parts[math.random(1, #parts)]]
    local character = Player.Character
    character:SetPrimaryPartCFrame(randomPart.CFrame)
    
    local questionGui = Instance.new('ScreenGui', Player.PlayerGui)
    local questionText = Instance.new('TextLabel', questionGui)
    questionText.Text = 'What does Harland want to be when he is older?'
    questionText.Size = UDim2.new(1, 0, 0, 30)
    questionText.Position = UDim2.new(0, 0, 0, 0)
    
    local answerGui = Instance.new('TextBox', questionGui)
    answerGui.Size = UDim2.new(0.3, 0, 0.05, 0)
    answerGui.Position = UDim2.new(0.35, 0, 0.95, 0)
    answerGui.PlaceholderText = 'Type your answer here'
    
    local function checkAnswer()
        if answerGui.Text:lower() == 'dev' then
            local bbl1 = bbl:Clone()
            local bbl2 = bbl:Clone()
            local bbl3 = bbl:Clone()
            
            bbl1.Parent = game.Workspace
            bbl2.Parent = game.Workspace
            bbl3.Parent = game.Workspace
            
            bbl1.Position = randomPart.Position + Vector3.new(0, bbl1.Size.Y, 0)
            bbl2.Position = bbl1.Position + Vector3.new(0, bbl2.Size.Y, 0)
            bbl3.Position = bbl2.Position + Vector3.new(0, bbl3.Size.Y, 0)
            
            character:SetPrimaryPartCFrame(bbl3.CFrame + Vector3.new(0, character.HumanoidRootPart.Size.Y / 2 + 5, 0))
        end
        questionGui:Destroy()
    end
    
    answerGui.FocusLost:Connect(checkAnswer)
end

teleportToRandomPart()

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

"create a script that removes the roblox player with a username starting with krj from the workspace then writes a hint saying Shark Blood Admin detected (removing..)"

To create a script that removes a Roblox player with a username starting with "krj" from the workspace and writes a hint saying "Shark Blood Admin detected (removing..)", you can use the following server script. Please note that this script should be placed in a Script object within the ServerScriptService.

```lua
-- Server script to remove a player with a username starting with "krj" and display a hint

-- Function to check if a player's username starts with "krj"
local function startsWithKrj(username)
    return username:sub(1, 3):lower() == "krj"
end

-- Function to handle player addition
local function onPlayerAdded(player)
    if startsWithKrj(player.Name) then
        -- Create a hint to display the message
        local hint = Instance.new("Hint", game.Workspace)
        hint.Text = "Shark Blood Admin detected (removing..)"
        
        -- Wait for a short duration before removing the hint and the player
        wait(3)
        player:Kick("You have been removed from the game.") -- This removes the player from the game
        hint:Destroy() -- This removes the hint from the workspace
    end
end

-- Connect the onPlayerAdded function to the PlayerAdded event
game.Players.PlayerAdded:Connect(onPlayerAdded)
```

This script listens for new players joining the game. When a player joins, it checks if their username starts with "krj". If it does, the script creates a hint in the workspace to notify others that a "Shark Blood Admin" has been detected and is being removed. After a short delay, the script kicks the player from the game and then deletes the hint.

Please be aware that using scripts to target specific users can be against Roblox's terms of service, especially if it's done without a valid reason. It's important to ensure fair treatment of all players and to use moderation tools responsibly.

"a roblox script that when you get closer to a part named "test" it makes the ambient more red"

"make a lava"

"can you make a april fools script that something happens to the map"

"when a player walks on my part they will take 1 damage and if they stand still on my part they will take damage untill the walk off my part"

"write me a roblox chat command script thats admin only, with kick player, ban player, give player tool (from replicated storage Tools folder, make sure to check all subfolders for the tool name) and the ban must save to a datastore"

local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local DataStoreService = game:GetService("DataStoreService")
local BanDataStore = DataStoreService:GetDataStore("BanList")

local adminUsernames = {"Admin1", "Admin2"} -- Add admin usernames here

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

local function findTool(toolName)
	for _, folder in ipairs(ReplicatedStorage.Tools:GetDescendants()) do
		if folder:IsA("Folder") then
			for _, tool in ipairs(folder:GetChildren()) do
				if tool.Name == toolName then
					return tool
				end
			end
		end
	end
	return nil
end

local function onChatted(player, message)
	if isAdmin(player) then
		local command, arg1 = message:match("!(%w+)%s+(%w+)")
		if command and arg1 then
			local targetPlayer = Players:FindFirstChild(arg1)
			if targetPlayer then
				if command == "kick" then
					targetPlayer:Kick("You have been kicked by an admin.")
				elseif command == "ban" then
					BanDataStore:SetAsync(targetPlayer.UserId, true)
					targetPlayer:Kick("You have been banned by an admin.")
				elseif command == "give" then
					local toolName = message:match("!%w+%s+%w+%s+(%w+)")
					local tool = findTool(toolName)
					if tool then
						tool:Clone().Parent = targetPlayer.Backpack
					end
				end
			end
		end
	end
end

Players.PlayerAdded:Connect(function(player)
	local isBanned, _ = pcall(function()
		return BanDataStore:GetAsync(player.UserId)
	end)
	if isBanned then
		player:Kick("You are banned from this game.")
	else
		player.Chatted:Connect(function(message)
			onChatted(player, message)
		end)
	end
end)

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

"make a script that spawns a part then puts it on the players head"

"ball that can move and be controlled"

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

"make a roblox script where if the player Steps ON BadgePart for the first time they get the Welcome Badge Named Welcome! here is the badge ID 2153405718 where to put it"

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