SPARKLESGUI

--made by pex#1607

local SparklesGUI = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local credit = Instance.new("TextLabel")
local MAIN = Instance.new("Frame")
local PLAYERN = Instance.new("TextBox")
local ONB = Instance.new("TextButton")
local OFFB = Instance.new("TextButton")



SparklesGUI.Name = "SparklesGUI"
SparklesGUI.Parent = game.CoreGui

Frame.Parent = SparklesGUI
Frame.Active = true
Frame.Draggable = true
Frame.BackgroundColor3 = Color3.new(0.54902, 0.137255, 0.137255)
Frame.BorderColor3 = Color3.new(1, 0.411765, 0.411765)
Frame.Position = UDim2.new(0.5, -103, 0.5, -10)
Frame.Size = UDim2.new(0, 206, 0, 20)

credit.Name = "credit"
credit.Parent = Frame
credit.BackgroundColor3 = Color3.new(1, 1, 1)
credit.BackgroundTransparency = 1
credit.Size = UDim2.new(0, 206, 0, 20)
credit.Font = Enum.Font.Highway
credit.Text = "made by pex#1607"
credit.TextColor3 = Color3.new(1, 0.411765, 0.411765)
credit.TextScaled = true
credit.TextSize = 14
credit.TextWrapped = true

MAIN.Name = "MAIN"
MAIN.Parent = Frame
MAIN.BackgroundColor3 = Color3.new(0.54902, 0.137255, 0.137255)
MAIN.BorderColor3 = Color3.new(1, 0.411765, 0.411765)
MAIN.Position = UDim2.new(0, 0, 0, 25)
MAIN.Size = UDim2.new(0, 206, 0, 175)

PLAYERN.Name = "PLAYERN"
PLAYERN.Parent = MAIN
PLAYERN.BackgroundColor3 = Color3.new(1, 0.411765, 0.411765)
PLAYERN.BorderColor3 = Color3.new(0.54902, 0.137255, 0.137255)
PLAYERN.Position = UDim2.new(0, 5, 0, 5)
PLAYERN.Size = UDim2.new(0, 196, 0, 50)
PLAYERN.Font = Enum.Font.Highway
PLAYERN.Text = "PLAYERNAME"
PLAYERN.TextColor3 = Color3.new(0.54902, 0.137255, 0.137255)
PLAYERN.TextScaled = true
PLAYERN.TextSize = 14
PLAYERN.TextWrapped = true

ONB.Name = "ONB"
ONB.Parent = MAIN
ONB.BackgroundColor3 = Color3.new(1, 0.411765, 0.411765)
ONB.BorderColor3 = Color3.new(0.54902, 0.137255, 0.137255)
ONB.Position = UDim2.new(0, 55, 0, 65)
ONB.Size = UDim2.new(0, 100, 0, 40)
ONB.Font = Enum.Font.SourceSans
ONB.Text = "ON"
ONB.TextColor3 = Color3.new(0.54902, 0.137255, 0.137255)
ONB.TextScaled = true
ONB.TextSize = 14
ONB.TextWrapped = true

OFFB.Name = "OFFB"
OFFB.Parent = MAIN
OFFB.BackgroundColor3 = Color3.new(1, 0.411765, 0.411765)
OFFB.BorderColor3 = Color3.new(0.54902, 0.137255, 0.137255)
OFFB.Position = UDim2.new(0, 55, 0, 115)
OFFB.Size = UDim2.new(0, 100, 0, 40)
OFFB.Font = Enum.Font.SourceSans
OFFB.Text = "OFF"
OFFB.TextColor3 = Color3.new(0.54902, 0.137255, 0.137255)
OFFB.TextScaled = true
OFFB.TextSize = 14
OFFB.TextWrapped = true

--FUNCTIONS

rem = workspace.Remote.GrabItem
rem1 = workspace.Remote.PlaceMaterial

function clearflares()
	for i,v in pairs(workspace:GetChildren()) do
		if v.Name == "RoadFlareLit" then
			rem:FireServer(nil, nil, v)
		end
	end
end

ONB.MouseButton1Down:connect(function()
	clearflares()
	if workspace[PLAYERN.Text].Torso:FindFirstChild("Sparkles") == nil then
		rem1:FireServer(game.Lighting.Materials.RoadFlareLit, workspace[PLAYERN.Text].Torso.Position)
		wait(.5)
		rem:FireServer(workspace[PLAYERN.Text].Torso, nil, game.Workspace.RoadFlareLit.Tip.Sparkles)
		wait(.5)
		clearflares()
	end
end)

OFFB.MouseButton1Down:connect(function()
	if workspace[PLAYERN.Text].Torso:FindFirstChild("Sparkles") then
		rem:FireServer(nil, nil, workspace[PLAYERN.Text].Torso.Sparkles)
	end
end)

--made by pex#1607