-- Create Gui
local RadioGui = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local SoundId = Instance.new("TextBox")
local Pitch = Instance.new("TextBox")
local Time = Instance.new("TextBox")
local Distortion = Instance.new("TextBox")
local Play = Instance.new("TextButton")
local Credits = Instance.new("TextLabel")
local T = Instance.new("TextLabel")
local T_2 = Instance.new("TextLabel")
local T_3 = Instance.new("TextLabel")
local T_4 = Instance.new("TextLabel")

RadioGui.Name = "RadioGui"
RadioGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")

Frame.Parent = RadioGui
Frame.Active = true
Frame.BackgroundColor3 = Color3.new(0.709804, 0.0941177, 0.862745)
Frame.BackgroundTransparency = 0.40000000596046
Frame.BorderColor3 = Color3.new(1, 0.0196078, 0.772549)
Frame.BorderSizePixel = 3
Frame.Draggable = true
Frame.Position = UDim2.new(0, 0, 0.307387859, 0)
Frame.Selectable = true
Frame.Size = UDim2.new(0, 420, 0, 450)

SoundId.Name = "SoundId"
SoundId.Parent = Frame
SoundId.BackgroundColor3 = Color3.new(0.796079, 0.0588235, 0.698039)
SoundId.BackgroundTransparency = 0.30000001192093
SoundId.BorderColor3 = Color3.new(0.996078, 0.0627451, 0.827451)
SoundId.BorderSizePixel = 3
SoundId.Position = UDim2.new(0.446764082, 0, 0.0276595745, 0)
SoundId.Size = UDim2.new(0, 244, 0, 50)
SoundId.Font = Enum.Font.SourceSans
SoundId.FontSize = Enum.FontSize.Size14
SoundId.Text = "1337"
SoundId.TextColor3 = Color3.new(1, 0.333333, 0.498039)
SoundId.TextScaled = true
SoundId.TextSize = 14
SoundId.TextStrokeTransparency = 0
SoundId.TextWrapped = true

Pitch.Name = "Pitch"
Pitch.Parent = Frame
Pitch.BackgroundColor3 = Color3.new(0.796079, 0.0588235, 0.698039)
Pitch.BackgroundTransparency = 0.30000001192093
Pitch.BorderColor3 = Color3.new(0.996078, 0.0627451, 0.827451)
Pitch.BorderSizePixel = 3
Pitch.Position = UDim2.new(0.446764082, 0, 0.17872341, 0)
Pitch.Size = UDim2.new(0, 244, 0, 50)
Pitch.Font = Enum.Font.SourceSans
Pitch.FontSize = Enum.FontSize.Size14
Pitch.Text = "1"
Pitch.TextColor3 = Color3.new(1, 0.333333, 0.498039)
Pitch.TextScaled = true
Pitch.TextSize = 14
Pitch.TextStrokeTransparency = 0
Pitch.TextWrapped = true

Time.Name = "Time"
Time.Parent = Frame
Time.BackgroundColor3 = Color3.new(0.796079, 0.0588235, 0.698039)
Time.BackgroundTransparency = 0.30000001192093
Time.BorderColor3 = Color3.new(0.996078, 0.0627451, 0.827451)
Time.BorderSizePixel = 3
Time.Position = UDim2.new(0.446764082, 0, 0.340425521, 0)
Time.Size = UDim2.new(0, 244, 0, 50)
Time.Font = Enum.Font.SourceSans
Time.FontSize = Enum.FontSize.Size14
Time.Text = "0"
Time.TextColor3 = Color3.new(1, 0.333333, 0.498039)
Time.TextScaled = true
Time.TextSize = 14
Time.TextStrokeTransparency = 0
Time.TextWrapped = true

Distortion.Name = "Distortion"
Distortion.Parent = Frame
Distortion.BackgroundColor3 = Color3.new(0.796079, 0.0588235, 0.698039)
Distortion.BackgroundTransparency = 0.30000001192093
Distortion.BorderColor3 = Color3.new(0.996078, 0.0627451, 0.827451)
Distortion.BorderSizePixel = 3
Distortion.Position = UDim2.new(0.446764082, 0, 0.487234056, 0)
Distortion.Size = UDim2.new(0, 244, 0, 50)
Distortion.Font = Enum.Font.SourceSans
Distortion.FontSize = Enum.FontSize.Size14
Distortion.Text = "0"
Distortion.TextColor3 = Color3.new(1, 0.333333, 0.498039)
Distortion.TextScaled = true
Distortion.TextSize = 14
Distortion.TextStrokeTransparency = 0
Distortion.TextWrapped = true

Play.Name = "Play"
Play.Parent = Frame
Play.BackgroundColor3 = Color3.new(0.811765, 0.0470588, 0.74902)
Play.BackgroundTransparency = 0.30000001192093
Play.BorderColor3 = Color3.new(1, 0.0313726, 0.921569)
Play.BorderSizePixel = 3
Play.Position = UDim2.new(0.291235805, 0, 0.673325002, 0)
Play.Size = UDim2.new(0, 200, 0, 50)
Play.Font = Enum.Font.SourceSans
Play.FontSize = Enum.FontSize.Size14
Play.Text = "Play"
Play.TextColor3 = Color3.new(1, 0.333333, 0.498039)
Play.TextScaled = true
Play.TextSize = 14
Play.TextStrokeTransparency = 0
Play.TextWrapped = true

Credits.Name = "Credits"
Credits.Parent = Frame
Credits.BackgroundColor3 = Color3.new(1, 1, 1)
Credits.BackgroundTransparency = 1
Credits.Position = UDim2.new(0.0167014617, 0, 0.88936168, 0)
Credits.Size = UDim2.new(0, 471, 0, 52)
Credits.Font = Enum.Font.SourceSans
Credits.FontSize = Enum.FontSize.Size14
Credits.Text = "Script Made By Dexia Fuck Skids"
Credits.TextColor3 = Color3.new(1, 0.333333, 0.498039)
Credits.TextScaled = true
Credits.TextSize = 14
Credits.TextStrokeTransparency = 0
Credits.TextWrapped = true

T.Name = "T"
T.Parent = Frame
T.BackgroundColor3 = Color3.new(0.6, 0.0352941, 0.6)
T.BackgroundTransparency = 0.30000001192093
T.Position = UDim2.new(0.0167014617, 0, 0.0276595745, 0)
T.Size = UDim2.new(0, 192, 0, 50)
T.Font = Enum.Font.SourceSans
T.FontSize = Enum.FontSize.Size14
T.Text = "SoundId/HashId"
T.TextColor3 = Color3.new(1, 0.333333, 0.498039)
T.TextScaled = true
T.TextSize = 14
T.TextStrokeTransparency = 0
T.TextWrapped = true

T_2.Name = "T"
T_2.Parent = Frame
T_2.BackgroundColor3 = Color3.new(0.6, 0.0352941, 0.6)
T_2.BackgroundTransparency = 0.30000001192093
T_2.Position = UDim2.new(0.0167014617, 0, 0.17872341, 0)
T_2.Size = UDim2.new(0, 192, 0, 50)
T_2.Font = Enum.Font.SourceSans
T_2.FontSize = Enum.FontSize.Size14
T_2.Text = "Pitch"
T_2.TextColor3 = Color3.new(1, 0.333333, 0.498039)
T_2.TextScaled = true
T_2.TextSize = 14
T_2.TextStrokeTransparency = 0
T_2.TextWrapped = true

T_3.Name = "T"
T_3.Parent = Frame
T_3.BackgroundColor3 = Color3.new(0.6, 0.0352941, 0.6)
T_3.BackgroundTransparency = 0.30000001192093
T_3.Position = UDim2.new(0.0167014617, 0, 0.340425551, 0)
T_3.Size = UDim2.new(0, 192, 0, 50)
T_3.Font = Enum.Font.SourceSans
T_3.FontSize = Enum.FontSize.Size14
T_3.Text = "Time Position"
T_3.TextColor3 = Color3.new(1, 0.333333, 0.498039)
T_3.TextScaled = true
T_3.TextSize = 14
T_3.TextStrokeTransparency = 0
T_3.TextWrapped = true

T_4.Name = "T"
T_4.Parent = Frame
T_4.BackgroundColor3 = Color3.new(0.6, 0.0352941, 0.6)
T_4.BackgroundTransparency = 0.30000001192093
T_4.Position = UDim2.new(0.0167014617, 0, 0.487234056, 0)
T_4.Size = UDim2.new(0, 192, 0, 50)
T_4.Font = Enum.Font.SourceSans
T_4.FontSize = Enum.FontSize.Size14
T_4.Text = "Distortion"
T_4.TextColor3 = Color3.new(1, 0.333333, 0.498039)
T_4.TextScaled = true
T_4.TextSize = 14
T_4.TextStrokeTransparency = 0
T_4.TextWrapped = true

function weld(player,part)
	local function weldBetween(a, b)
    local weld = Instance.new("ManualWeld")
    weld.Part0 = a
    weld.Part1 = b
    weld.C0 = CFrame.new()
    weld.C1 = b.CFrame:inverse() * a.CFrame
    weld.Parent = a
    return weld;
	end
	local char = player.Character
	part.Parent=char
	part.CFrame=char:WaitForChild("Torso").CFrame*CFrame.new(Vector3.new(0,0,1))*CFrame.Angles(0,math.rad(180),math.rad(45))
	weldBetween(char:WaitForChild("Torso"), part)
	part.CanCollide=true
	part.Anchored=false
end

-- Create Radio
local Radio = Instance.new("Part")
local Sound = Instance.new("Sound")
local RE = Instance.new("RemoteEvent")
local RadioMesh = Instance.new("SpecialMesh")
RadioMesh.Parent = Radio
RE.Parent = Radio
RadioMesh.MeshId = "http://www.roblox.com/asset/?id=212302951"
RadioMesh.TextureId = "http://www.roblox.com/asset/?id=684263742"
RadioMesh.Scale = Vector3.new(5, 5, 5)
Radio.Size = Vector3.new(4.2, 2.23, 2)
Sound.Parent = Radio
Radio.Name = "Radio"
weld(game.Players.LocalPlayer,Radio)

-- Fire Play
Play.MouseButton1Click:Connect(function()
	Sound.Pitch = Pitch.Text
	if tonumber(Pitch.Text) == nil then
		Sound.Pitch = 1
	end
	Sound.TimePosition = Time.Text
	local Dists = Instance.new("DistortionSoundEffect")
	Dists.Name = "Dist"
	if Sound:FindFirstChild("Dist") then
		Sound.Dist:Destroy()
	end
	if tonumber(SoundId.Text) ~= nil then
		Sound.SoundId = "rbxassetid://"..SoundId.Text
	elseif tonumber(SoundId.Text) == nil then
		Sound.SoundId = "rbxassetid://&hash="..SoundId.Text
	end
	if tonumber(Distortion.Text) == 0 then
		if Sound:FindFirstChild("Dist") then
			Sound.Dist:Destroy()
		end
	elseif tonumber(Distortion.Text) > 0 then
		Dists.Level = Distortion.Text
		Dists:Clone().Parent = Sound
	end
	Sound.Looped = true
	Sound.Volume = 10
	Sound:Play()
end)
while Sound.Playing == true do
	wait()
	RadioMesh.Scale = RadioMesh.Scale+Vector3.new(1,1,1)
	wait()
	RadioMesh.Scale = RadioMesh.Scale-Vector3.new(1,1,1)
end