Goomberson's Boombox Breaker V2

local BBV2 = Instance.new("ScreenGui")
local Credit = Instance.new("TextLabel")
local Frame = Instance.new("Frame")
local Middle1 = Instance.new("Frame")
local Thanos = Instance.new("TextButton")
local Play = Instance.new("TextButton")
local TPInput = Instance.new("TextBox")
local ID = Instance.new("TextBox")
local Exec = Instance.new("TextButton")
local BottomBar = Instance.new("Frame")
local TopBar = Instance.new("Frame")
local TextLabel = Instance.new("TextLabel")
local Minimize = Instance.new("TextButton")
local Middle2 = Instance.new("Frame")
local TPInput_2 = Instance.new("TextBox")
local Name = Instance.new("TextBox")
local Exec_2 = Instance.new("TextButton")
local Log = Instance.new("TextButton")
local boomboom = Instance.new("TextButton")
local page1 = Instance.new("TextButton")
local page2 = Instance.new("TextButton")

BBV2.Name = "BBV2"
BBV2.Parent = game.CoreGui
BBV2.ZIndexBehavior = Enum.ZIndexBehavior.Sibling

Frame.Parent = BBV2
Frame.BackgroundColor3 = Color3.new(1, 1, 1)
Frame.BackgroundTransparency = 1
Frame.BorderSizePixel = 0
Frame.Position = UDim2.new(0.106898695, 0, 0.323184997, 0)
Frame.Size = UDim2.new(0, 233, 0, 121)
Frame.Selectable = true
Frame.Active = true
Frame.Draggable = true

Middle1.Name = "Middle1"
Middle1.Parent = Frame
Middle1.BackgroundColor3 = Color3.new(0.352941, 0.352941, 0.352941)
Middle1.BorderSizePixel = 0
Middle1.Position = UDim2.new(0.0254123099, 0, 0.150802225, 0)
Middle1.Size = UDim2.new(0, 220, 0, 101)

Thanos.Name = "Thanos"
Thanos.Parent = Middle1
Thanos.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
Thanos.BorderSizePixel = 0
Thanos.Position = UDim2.new(0.0634796619, 0, 0.69524467, 0)
Thanos.Size = UDim2.new(0, 60, 0, 23)
Thanos.Font = Enum.Font.Code
Thanos.Text = "Thanos"
Thanos.TextColor3 = Color3.new(1, 1, 1)
Thanos.TextSize = 14
Thanos.MouseButton1Click:connect(function()
for i,v in pairs(game.Players:GetChildren()) do
if v.Name ~= game.Players.LocalPlayer.Name then
for x,d in pairs(game.Workspace[v.Name]:GetDescendants()) do
if d:IsA("Sound") then
d.Playing = false
end
end
end
end
end)

Play.Name = "Play"
Play.Parent = Middle1
Play.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
Play.BorderSizePixel = 0
Play.Position = UDim2.new(0.0634796247, 0, 0.378413051, 0)
Play.Size = UDim2.new(0, 60, 0, 23)
Play.Font = Enum.Font.Code
Play.Text = "Play"
Play.TextColor3 = Color3.new(1, 1, 1)
Play.TextSize = 14
Play.MouseButton1Click:connect(function()
local id = ID.Text
local zeros = 50000

local me = game:GetService("Players").LocalPlayer.Character
local remote

for i,v in next, me:children() do
    if v:IsA("Tool") and v:FindFirstChildOfClass("RemoteEvent") then
        remote = v:FindFirstChildOfClass("RemoteEvent")
    end
end

id = ("0"):rep(zeros) .. id

remote:FireServer("PlaySong", id)
print(id)
game.Players.LocalPlayer.PlayerGui.ChooseSongGui.Frame.Visible = false
end)

TPInput.Name = "TPInput"
TPInput.Parent = Middle1
TPInput.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
TPInput.BorderSizePixel = 0
TPInput.Position = UDim2.new(0.395454526, 0, 0.0693069324, 0)
TPInput.Size = UDim2.new(0, 109, 0, 23)
TPInput.Font = Enum.Font.Code
TPInput.Text = "Number"
TPInput.TextColor3 = Color3.new(1, 1, 1)
TPInput.TextSize = 14

ID.Name = "ID"
ID.Parent = Middle1
ID.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
ID.BorderSizePixel = 0
ID.Position = UDim2.new(0.395454526, 0, 0.376237601, 0)
ID.Size = UDim2.new(0, 109, 0, 23)
ID.Font = Enum.Font.Code
ID.Text = "ID"
ID.TextColor3 = Color3.new(1, 1, 1)
ID.TextSize = 14

Exec.Name = "Exec#"
Exec.Parent = Middle1
Exec.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
Exec.BorderSizePixel = 0
Exec.Position = UDim2.new(0.0634796247, 0, 0.0705929697, 0)
Exec.Size = UDim2.new(0, 60, 0, 23)
Exec.Font = Enum.Font.Code
Exec.Text = "Exec#"
Exec.TextColor3 = Color3.new(1, 1, 1)
Exec.TextSize = 14
Exec.MouseButton1Down:connect(function()
local LP = game:GetService'Players'.LocalPlayer

for _,v in pairs(LP.Character:GetDescendants()) do
    if v:IsA'Sound' then
        if v.IsPlaying then
            if v.Name ~= "Jumping" or v.Name ~= "FreeFalling" or v.Name ~= "Died" or v.Name ~= "Landing" or v.Name ~= "Splash" or v.Name ~= "Running" or v.Name ~= "Swimming" or v.Name ~= "Climbing" then
                v.TimePosition = TPInput.Text
            end
        end
    end
end
end)

BottomBar.Name = "BottomBar"
BottomBar.Parent = Frame
BottomBar.BackgroundColor3 = Color3.new(0.152941, 0.152941, 0.152941)
BottomBar.BorderSizePixel = 0
BottomBar.Position = UDim2.new(-0.0030923672, 0, 0.980549514, 0)
BottomBar.Size = UDim2.new(0, 232, 0, 19)

TopBar.Name = "TopBar"
TopBar.Parent = Frame
TopBar.BackgroundColor3 = Color3.new(0.152941, 0.152941, 0.152941)
TopBar.BorderSizePixel = 0
TopBar.Position = UDim2.new(-0.00309236068, 0, -0.00285906834, 0)
TopBar.Size = UDim2.new(0, 232, 0, 19)

TextLabel.Parent = TopBar
TextLabel.BackgroundColor3 = Color3.new(1, 1, 1)
TextLabel.BackgroundTransparency = 1
TextLabel.Position = UDim2.new(0.19152236, 0, -0.0136817396, 0)
TextLabel.Size = UDim2.new(0, 142, 0, 19)
TextLabel.Font = Enum.Font.Code
TextLabel.Text = "Boombox Breaker V2"
TextLabel.TextColor3 = Color3.new(1, 1, 1)
TextLabel.TextScaled = true
TextLabel.TextSize = 14
TextLabel.TextWrapped = true

Minimize.Name = "Minimize"
Minimize.Parent = TopBar
Minimize.BackgroundColor3 = Color3.new(1, 1, 1)
Minimize.BackgroundTransparency = 1
Minimize.BorderSizePixel = 0
Minimize.Position = UDim2.new(0.913793087, 0, -0.0526315793, 0)
Minimize.Size = UDim2.new(0, 20, 0, 20)
Minimize.Font = Enum.Font.SourceSans
Minimize.Text = "-"
Minimize.TextColor3 = Color3.new(1, 1, 1)
Minimize.TextScaled = true
Minimize.TextSize = 14
Minimize.TextWrapped = true

Credit.Name = "Credit"
Credit.Parent = BottomBar
Credit.BackgroundColor3 = Color3.new(1, 1, 1)
Credit.BackgroundTransparency = 1
Credit.Position = UDim2.new(0.19152236, 0, -0.0136817396, 0)
Credit.Size = UDim2.new(0, 142, 0, 19)
Credit.Font = Enum.Font.Code
Credit.Text = ""
Credit.TextColor3 = Color3.new(1, 1, 1)
Credit.TextScaled = true
Credit.TextSize = 3
Credit.TextWrapped = true

Middle2.Name = "Middle2"
Middle2.Parent = Frame
Middle2.BackgroundColor3 = Color3.new(0.352941, 0.352941, 0.352941)
Middle2.BorderSizePixel = 0
Middle2.Position = UDim2.new(0.0254123099, 0, 0.150802225, 0)
Middle2.Size = UDim2.new(0, 220, 0, 101)
Middle2.Visible = false

TPInput_2.Name = "TPInput"
TPInput_2.Parent = Middle2
TPInput_2.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
TPInput_2.BorderSizePixel = 0
TPInput_2.Position = UDim2.new(0.395454526, 0, 0.0693069324, 0)
TPInput_2.Size = UDim2.new(0, 109, 0, 23)
TPInput_2.Font = Enum.Font.Code
TPInput_2.Text = "Number"
TPInput_2.TextColor3 = Color3.new(1, 1, 1)
TPInput_2.TextSize = 14

Name.Name = "Name"
Name.Parent = Middle2
Name.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
Name.BorderSizePixel = 0
Name.Position = UDim2.new(0.395454526, 0, 0.376237601, 0)
Name.Size = UDim2.new(0, 109, 0, 23)
Name.Font = Enum.Font.Code
Name.Text = "Name"
Name.TextColor3 = Color3.new(1, 1, 1)
Name.TextSize = 14

Exec_2.Name = "Exec#"
Exec_2.Parent = Middle2
Exec_2.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
Exec_2.BorderSizePixel = 0
Exec_2.Position = UDim2.new(0.0634796247, 0, 0.0705929697, 0)
Exec_2.Size = UDim2.new(0, 60, 0, 23)
Exec_2.Font = Enum.Font.Code
Exec_2.Text = "Exec#"
Exec_2.TextColor3 = Color3.new(1, 1, 1)
Exec_2.TextSize = 14
Exec_2.MouseButton1Click:connect(function()
local NA = Name.Text
local WE = TPInput_2.Text
for _,v in pairs(game.workspace[NA]:GetDescendants()) do
    if v:IsA'Sound' then
        if v.IsPlaying then
            if v.Name ~= "Jumping" or v.Name ~= "FreeFalling" or v.Name ~= "Died" or v.Name ~= "Landing" or v.Name ~= "Splash" or v.Name ~= "Running" or v.Name ~= "Swimming" or v.Name ~= "Climbing" then
                v.TimePosition = WE
            end
        end
    end
end
end)

Log.Name = "Log"
Log.Parent = Middle2
Log.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
Log.BorderSizePixel = 0
Log.Position = UDim2.new(0.0634796247, 0, 0.684454322, 0)
Log.Size = UDim2.new(0, 60, 0, 23)
Log.Font = Enum.Font.Code
Log.Text = "Log"
Log.TextColor3 = Color3.new(1, 1, 1)
Log.TextSize = 14

boomboom.Name = "boomboom"
boomboom.Parent = Middle2
boomboom.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
boomboom.BorderSizePixel = 0
boomboom.Position = UDim2.new(0.0634796247, 0, 0.377523631, 0)
boomboom.Size = UDim2.new(0, 60, 0, 23)
boomboom.Font = Enum.Font.Code
boomboom.Text = "Stop"
boomboom.TextColor3 = Color3.new(1, 1, 1)
boomboom.TextSize = 14
boomboom.MouseButton1Click:connect(function()
local NA = Name.Text
for _,v in pairs(game.workspace[NA]:GetDescendants()) do
    if v:IsA'Sound' then
        if v.IsPlaying then
            if v.Name ~= "Jumping" or v.Name ~= "FreeFalling" or v.Name ~= "Died" or v.Name ~= "Landing" or v.Name ~= "Splash" or v.Name ~= "Running" or v.Name ~= "Swimming" or v.Name ~= "Climbing" then
                v.Playing = false
            end
        end
    end
end
end)

page1.Name = "page1"
page1.Parent = Frame
page1.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
page1.BorderSizePixel = 0
page1.Position = UDim2.new(0.623817563, 0, 0.723996997, 0)
page1.Size = UDim2.new(0, 23, 0, 23)
page1.Font = Enum.Font.Code
page1.Text = "<"
page1.TextColor3 = Color3.new(1, 1, 1)
page1.TextSize = 14

page2.Name = "page2"
page2.Parent = Frame
page2.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
page2.BorderSizePixel = 0
page2.Position = UDim2.new(0.767180324, 0, 0.723996997, 0)
page2.Size = UDim2.new(0, 23, 0, 23)
page2.Font = Enum.Font.Code
page2.Text = ">"
page2.TextColor3 = Color3.new(1, 1, 1)
page2.TextSize = 14


Minimize.MouseButton1Down:connect(function()
	if open == true then
		if Middle1.Visible == true then
			Middle1.Visible = false
			BottomBar.Visible = false
			page1.Visible = false
			page2.Visible = false
			Minimize.Text = "+"
			open = false
		else
			Middle2.Visible = false
			BottomBar.Visible = false
			page1.Visible = false
			page2.Visible = false
			Minimize.Text = "+"
			open = false
		end
	else
		if Middle1.Visible == false then
			Middle1.Visible = true
			BottomBar.Visible = true
			page1.Visible = true
			page2.Visible = true
			Minimize.Text = "-"
			open = true
		else
			Middle2.Visible = true
			page1.Visible = true
			page2.Visible = true
			BottomBar.Visible = true
			Minimize.Text = "-"
			open = true
		end
	end
end)

TPInput.FocusLost:connect(function()
	if TPInput.Text == "" or TPInput.Text == "asd" then
		TPInput.Text = "Number"
	end
end)

ID.FocusLost:connect(function()
	if ID.Text == "" or TPInput.Text == "asd" then
		ID.Text = "ID"
	end
end)

page1.MouseButton1Down:connect(function()
	Middle1.Visible = true
	Middle2.Visible = false
end)
page2.MouseButton1Down:connect(function()
	Middle1.Visible = false
	Middle2.Visible = true
end)