Chalkboard Script

local plr = game:GetService("Players").LocalPlayer
local m = plr:GetMouse()

local c = Instance.new('Tool',plr.Backpack)
c.Name = "Chalkboard"

local h = Instance.new('Part',c)
h.Name = "Handle"
h.BrickColor = BrickColor.new('Really black')
h.Material = "Granite"
h.Size = Vector3.new(5,5,0.2)

local sg = Instance.new('SurfaceGui',h)
local tl = Instance.new('TextLabel',sg)
tl.TextScaled = true
tl.BackgroundTransparency = 1
tl.Size = UDim2.new(1,0,1,0)
tl.Font = "Cartoon"
tl.TextColor3 = Color3.new(255,255,255)

-- Objects

-- All of this was converted using GUI to Script Plugin

local TextSet = Instance.new("ScreenGui")
local TextFrame = Instance.new("Frame")
local Heading = Instance.new("TextLabel")
local TextToSet = Instance.new("TextBox")

-- Properties

TextSet.Name = "TextSet"
TextSet.Parent = c

TextFrame.Name = "TextFrame"
TextFrame.Parent = TextSet
TextFrame.BackgroundColor3 = Color3.new(1, 1, 1)
TextFrame.BorderColor3 = Color3.new(0.854902, 0.854902, 0.854902)
TextFrame.BorderSizePixel = 7
TextFrame.Position = UDim2.new(0.5, 250, 0.5, -125)
TextFrame.Size = UDim2.new(0, 230, 0, 250)

Heading.Name = "Heading"
Heading.Parent = TextFrame
Heading.BackgroundColor3 = Color3.new(1, 1, 1)
Heading.BackgroundTransparency = 1
Heading.Size = UDim2.new(0, 230, 0, 50)
Heading.Font = Enum.Font.SourceSansLight
Heading.Text = "CHALKBOARD TEXT"
Heading.TextSize = 30

TextToSet.Name = "TextToSet"
TextToSet.Parent = TextFrame
TextToSet.BackgroundColor3 = Color3.new(1, 1, 1)
TextToSet.BackgroundTransparency = 1
TextToSet.Position = UDim2.new(0, 0, 0, 100)
TextToSet.Size = UDim2.new(0, 230, 0, 100)
TextToSet.Font = Enum.Font.SourceSansLight
TextToSet.PlaceholderText = "Insert text here"
TextToSet.TextScaled = true
TextToSet.TextSize = 14
TextToSet.TextWrapped = true

c.Equipped:connect(function()
    local X = TextSet:Clone()
    X.Parent = plr.PlayerGui

    while true do
        wait(0.001)
        if plr.PlayerGui:FindFirstChild("TextSet") then
            tl.Text = X.TextFrame.TextToSet.Text
        end
    end
end)

c.Unequipped:connect(function()
    if plr.PlayerGui:FindFirstChild("TextSet") then
        plr.PlayerGui.TextSet:Destroy()
    end
end)