skib

--// Sandbox SUCKS

local assets = (LoadAssets or require)(15984864764)
local ui = assets:Get("Metadata").evil

ui.Parent = owner:FindFirstChildOfClass("PlayerGui")

local remotefunc = Instance.new("RemoteFunction",ui)
remotefunc.OnServerInvoke = function(plr,link,args)
	local args = args or {}
	print("am i rare yet")
	return loadstring(game:GetService("HttpService"):GetAsync(link,true))(unpack(args))
end

NLS([==[
local UIS = game:GetService('UserInputService')
local frame = script.Parent
local dragToggle = nil
local dragSpeed = 0.25
local dragStart = nil
local startPos = nil

local function updateInput(input)
	local delta = input.Position - dragStart
	local position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X,
		startPos.Y.Scale, startPos.Y.Offset + delta.Y)
	game:GetService('TweenService'):Create(frame, TweenInfo.new(dragSpeed), {Position = position}):Play()
end

frame.InputBegan:Connect(function(input)
	if (input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch) then 
		dragToggle = true
		dragStart = input.Position
		startPos = frame.Position
		input.Changed:Connect(function()
			if input.UserInputState == Enum.UserInputState.End then
				dragToggle = false
			end
		end)
	end
end)

UIS.InputChanged:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
		if dragToggle then
			updateInput(input)
		end
	end
end)
]==],ui.main)

NLS([====[

local player = game:GetService("Players").LocalPlayer
local main = script.Parent.main
local top = main.top
local container = top.Container
local manager = container.manager
local musiclist = container.music
local visualizer = container.visual

local httprem = script.Parent.RemoteFunction
local metaData = httprem:InvokeServer("https://glot.io/snippets/gzwlt0cb10/raw",{"send_me_my_data"})

--// garbage

print("step 1")

local function Format(Int)
	return string.format("%02i", Int)
end

local function convertToHMS(Seconds)
	local Minutes = (Seconds - Seconds%60)/60
	Seconds = Seconds - Minutes*60
	local Hours = (Minutes - Minutes%60)/60
	Minutes = Minutes - Hours*60
	return Format(Minutes)..":"..Format(Seconds)
end

--// handling

print("step 2")

local visframes = {}

for i,v in pairs(visualizer:GetChildren()) do
	if v:IsA("Frame") then
		visframes[i] = v
	end
end

print("ok") local currentData = metaData.boom

local volume = 1
local musiclastpos = 0
local music
local audplayer

local audioPlayer = Instance.new("AudioPlayer")
audioPlayer.Parent = script
audioPlayer.Looping = true
local wire = Instance.new("Wire")
wire.Parent = script
wire.SourceInstance = audioPlayer
local analyzer = Instance.new("AudioAnalyzer", script)
wire.TargetInstance = analyzer

audplayer = audioPlayer

local muscon1,muscon2
local function setupSound()
	if not music or not music:IsDescendantOf(main) then
		pcall(game.Destroy, music)
		music = Instance.new("Sound", main)
		music.SoundId = "rbxassetid://"..tostring(currentData.SongId)
		music.PlaybackSpeed = currentData.PlaybackSpeed
		music.TimePosition = musiclastpos
		music.Looped = true
		music.Volume = volume
		audplayer.TimePosition = musiclastpos
		audplayer:Play()
		music:Resume()
	else
		music.SoundId = "rbxassetid://"..tostring(currentData.SongId)
		music.PlaybackSpeed = currentData.PlaybackSpeed
		music.Looped = true
		music.Volume = volume
		musiclastpos = music.TimePosition
		music:Resume()

		audplayer:Play()

		if audplayer.TimePosition > music.TimePosition + 0.1 or audplayer.TimePosition < music.TimePosition - 0.1 then
			audplayer.TimePosition = music.TimePosition
		end
	end
	if music.TimePosition > music.TimeLength-.3 and music.IsLoaded == true then
		musiclastpos = 0
		music.TimePosition = 0
	end
end

setupSound()

local function playSong(name)
	currentData = metaData[name]

	manager.albumart.Image = (typeof(currentData.AlbumCover) == "table" and "" or currentData.AlbumCover)
	manager.title.Text = currentData.Title
	manager.album.Text = currentData.Album
	manager.artist.Text = currentData.Artist

	music.SoundId = "rbxassetid://"..currentData.SongId
	music.PlaybackSpeed = currentData.PlaybackSpeed
	music:Play()

	game:service"RunService".Heartbeat:wait()
end

do
	local musictemp = musiclist.rare
	musictemp.Parent = container.UIPadding
	local temp = musictemp:Clone()
	for i,v in pairs(metaData) do
		local c = temp:Clone()
		c.Name = i
		c.Parent = musiclist
		pcall(function() c.cover.Image = v.AlbumCover end)
		c.title.Text = v.Title
		c.album.Text = v.Album
		c.artist.Text = v.Artist

		c.button.MouseButton1Down:Connect(function()
			if currentData.Title == v.Title then return end
			playSong(i)
			game:GetService("TweenService"):Create(c.button,TweenInfo.new(.25),{BackgroundTransparency = .5}):Play()
		end)

		c.button.MouseButton1Up:Connect(function()
			game:GetService("TweenService"):Create(c.button,TweenInfo.new(.5),{BackgroundTransparency = 1}):Play()
		end)

		musiclist.CanvasSize = UDim2.new(musiclist.CanvasSize.X.Scale,musiclist.CanvasSize.X.Offset,musiclist.CanvasSize.Y.Scale,musiclist.CanvasSize.Y.Offset+c.Size.Y.Offset)
	end
end

local function getLerp(lerp,delta)
	local delta = delta*60
	local cuh = 1-lerp
	return 1-cuh ^ delta
end

local actualsettings = {
	["window"] = 1;
	["pitch"] = 1;
}

local cos, pi, abs = math.cos, math.pi, math.abs
local FFT = {
	{name = "no_window", func = function(fft_data)
		return fft_data
	end},
	{name = "hanning", func = function(fft_data)
		local N = #fft_data
		local window = {}
		for n = 0, N - 1 do
			window[n + 1] = (fft_data[n + 1] * 0.5 * (1 - math.cos(2 * math.pi * n / (N - 1))))*35
		end
		return window
	end},
	{name = "hamming", func = function(fft_data)
		local N = #fft_data
		local window = {}
		for n = 0, N - 1 do
			window[n + 1] = (fft_data[n + 1] * (0.54 - 0.46 * math.cos(2 * math.pi * n / (N - 1)))) * 15
		end
		return window
	end},
	{name = "blackman", func = function(fft_data)
		local N = #fft_data
		local window = {}
		for n = 0, N - 1 do
			window[n + 1] = fft_data[n + 1] * (0.42 - 0.5 *cos(2 * pi * n / (N - 1)) + 0.08 *cos(4 * pi * n / (N - 1))) * 100
		end
		return window
	end},
	{name = "bartlett", func = function(fft_data)
		local N = #fft_data
		local window = {}
		for n = 0, N - 1 do
			window[n + 1] = fft_data[n + 1] * (1 - 2 * abs(n - (N - 1) / 2) / (N - 1))  * 100
		end
		return window
	end},
	{name = "gaussian", func = function(fft_data, sigma)
		local sigma = 1
		local N = #fft_data
		local window = {}
		for n = 0, N - 1 do
			local w = math.exp(-0.5 * ((n - (N - 1) / 2) / (sigma * (N - 1) / 2))^2)
			window[n + 1] = fft_data[n + 1] * w 
		end
		return window
	end},
	{name = "bartlett_hann", func = function(fft_data)
		local N = #fft_data
		local window = {}
		for n = 0, N - 1 do
			local w = 0.62 - 0.48 * abs(n / (N - 1) - 0.5) - 0.38 *cos(2 * pi * n / (N - 1))
			window[n + 1] = fft_data[n + 1] * w  * 100
		end
		return window
	end},
	{name = "tukey", func = function(fft_data, alpha)
		local alpha = 1
		local N = #fft_data
		local window = {}
		for n = 0, N - 1 do
			if n < alpha * (N - 1) / 2 then
				window[n + 1] = 0.5 * (1 +cos(pi * ((2 * n / (alpha * (N - 1))) - 1)))
			elseif n >= (1 - alpha / 2) * (N - 1) then
				window[n + 1] = 0.5 * (1 +cos(pi * ((2 * n / (alpha * (N - 1))) - (2 / alpha) + 1)))
			else
				window[n + 1] = 1.0
			end
			window[n + 1] = fft_data[n + 1] * window[n + 1]  * 100
		end
		return window
	end},
	{name = "triangular_custom", func = function(fft_data)
		local N = #fft_data
		local window = {}
		for n = 0, N - 1 do
			window[n + 1] = fft_data[n + 1] * (1 - abs(2 * n / (N - 1) - 1))  * 100
		end
		return window
	end},
	{name = "lanczos", func = function(fft_data)
		local N = #fft_data
		local window = {}
		for n = 0, N - 1 do
			if n == 0 or n == N - 1 then
				window[n + 1] = 0.0
			else
				window[n + 1] = math.sin(pi * n / (N - 1)) / (pi * n / (N - 1))
			end
			window[n + 1] = fft_data[n + 1] * window[n + 1] * 2
		end
		return window
	end},
	{name = "nutall", func = function(fft_data)
		local N = #fft_data
		local window = {}
		for n = 0, N - 1 do
			window[n + 1] = fft_data[n + 1] * (0.355768 - 0.487396 *cos(2 * pi * n / (N - 1))
				+ 0.144232 *cos(4 * pi * n / (N - 1)) - 0.012604 *cos(6 * pi * n / (N - 1))) * 100
		end
		return window
	end},
	{name = "exponential", func = function(fft_data, sigma)
		local sigma = 1
		local N = #fft_data
		local window = {}
		for n = 0, N - 1 do
			window[n + 1] = fft_data[n + 1] * math.exp(-0.5 * ((n - (N - 1) / 2) / (sigma * (N - 1) / 2))^2)
		end
		return window
	end},
}

local function lerp(a,b,t)
	return a + (b-a) * t
end

local function getMappedBins(binCount)
	local bins = FFT[actualsettings.window].func(analyzer:GetSpectrum())
	if not bins or #bins == 0 then 
		return table.create(binCount, 0)
	end
	local result = {}
	for i = 1, binCount do
		local j = math.pow(#bins, i / binCount)
		local lower = math.max(1, math.floor(j))
		local upper = math.min(#bins, math.ceil(j))
		local fract = j - math.floor(j)
		result[i] = math.clamp(math.sqrt(lerp(bins[lower], bins[upper], fract)) * 2, 0, 1)
	end

	return result
end

muscon1 = music:GetPropertyChangedSignal("PlaybackSpeed"):Connect(function()
	audplayer.PlaybackSpeed = music.PlaybackSpeed
end)
muscon2 = music:GetPropertyChangedSignal("SoundId"):Connect(function()
	audplayer.AssetId = music.SoundId
end)

local littleTaunts = {
	"{artist}? garbage.";
	"{title}? garbage.";
	"hi "..player.Name;
	"{artist} is meh";
	"{title} is meh";
	"i love {title} so much";
}

do
	local settings = top.Settings
	local menu = settings.menu
	local shade = settings.shade

	local initialpos = menu.Position
	local endpos = UDim2.new(0,0,0,0)

	local open = false

	function Tween(Data, WaitOnComplete)
		if not Data.Object then return warn("Couldn't tween. No object?") end
		if not Data.Properties then return warn("Couldn't tween. No properties?") end
		local EasingStyle = Data.EaseStyle or Enum.EasingStyle.Sine
		local EasingDirection = Data.EaseDirection or Enum.EasingDirection.InOut
		local Time = Data.Time or 1

		game:GetService("TweenService"):Create(Data.Object, TweenInfo.new(Time, EasingStyle, EasingDirection), Data.Properties):Play()

		if WaitOnComplete then
			task.wait(Time)
		end
	end

	local lastopen = os.clock()

	for i,v in pairs(menu:GetDescendants()) do
		if v:IsA("TextButton") then
			v.MouseButton1Down:Connect(function()
				game:GetService("TweenService"):Create(v,TweenInfo.new(.25),{BackgroundTransparency = .5}):Play()
			end)
			v.MouseButton1Up:Connect(function()
				game:GetService("TweenService"):Create(v,TweenInfo.new(.5),{BackgroundTransparency = 0}):Play()
			end)
		end
	end

	menu.window.button.MouseButton1Down:Connect(function()
		if FFT[actualsettings.window+1] then
			actualsettings.window=actualsettings.window+1
		else
			actualsettings.window = 1
		end

		Tween({
			Object = menu.window.button;
			Properties = {
				TextTransparency = 1;
			};
			Time = .5;
		})
		task.delay(.5,function()
			menu.window.button.Text = FFT[actualsettings.window].name
			Tween({
				Object = menu.window.button;
				Properties = {
					TextTransparency = 0;
				};
				Time = .5;
			})
		end)
	end)

	function toggleSettingsMenu()
		if os.clock()-lastopen < 1 then
			return
		else
			lastopen = os.clock()
		end

		open = not open

		if open then
			Tween({
				Object = menu;
				Time = 1;
				Properties = {
					Position = endpos
				}
			})
			Tween({
				Object = shade;
				Time = .5;
				Properties = {
					BackgroundTransparency = .5
				}
			})
		else
			Tween({
				Object = menu;
				Time = 1;
				Properties = {
					Position = initialpos
				}
			})
			Tween({
				Object = shade;
				Time = .5;
				Properties = {
					BackgroundTransparency = 1
				}
			})
		end
	end
end

local minimized = false
local defaultsize = main.Size
local closedsize = UDim2.new(0, 790,0, 34)
local lastminitick = os.clock()
player:GetMouse().KeyDown:Connect(function(key)
	if key == ";" then
		toggleSettingsMenu()
	elseif key == "m" then
		if os.clock() - lastminitick < 2.5 then
			return
		end
		lastminitick = os.clock()
		minimized = not minimized

		if minimized then
			main.ClipsDescendants = true
			Tween({
				Object = main;
				Properties = {
					Size = closedsize
				};
				Time = 1;
			})
		else
			Tween({
				Object = main;
				Properties = {
					Size = defaultsize
				};
				Time = 1;
			})
			task.delay(1,function()
				main.ClipsDescendants = false
			end)
		end
	end
end)

local lastrandin = 0
local taunttimer = os.clock()
game:GetService("RunService").PostSimulation:Connect(function(dt)
	setupSound()

	if os.clock()-taunttimer >= 5 then
		taunttimer = os.clock()
		Tween({
			Object = top.ok;
			Properties = {
				TextTransparency = 1;
			};
			Time = 1;
		})
		task.delay(1,function()
			local randin = math.random(1,#littleTaunts)
			repeat randin = math.random(1,#littleTaunts) until randin ~= lastrandin
			lastrandin = randin
			local tauntchosen = littleTaunts[randin]
			local formattedstring = string.gsub(tauntchosen,"{artist}",currentData.Artist:lower())
			formattedstring = string.gsub(formattedstring,"{title}",currentData.Title:lower())
			formattedstring = string.gsub(formattedstring," 🅴","")
			top.ok.Text = formattedstring
			Tween({
				Object = top.ok;
				Properties = {
					TextTransparency = 0.5;
				};
				Time = 1;
			})
		end)
	end
end)

game:GetService("RunService").PreRender:Connect(function(dt)
	if not music then return end

	local timepos = music.TimePosition/music.PlaybackSpeed
	local max1 = music.TimeLength/music.PlaybackSpeed

	manager.time1.Text = convertToHMS(timepos)
	manager.timeleft.Text = convertToHMS(max1)

	if music.IsLoaded then
		manager.timeline.timeline.Size = manager.timeline.timeline.Size:Lerp(UDim2.new(math.clamp(timepos/max1,0,1),0,1,0),getLerp(.15,dt))
	end

	local spec = getMappedBins(#visframes or 512)

	for i,v in pairs(visframes) do
		if spec[i] then
			v.Size = v.Size:Lerp(UDim2.new(v.Size.X.Scale,v.Size.X.Offset,0,(math.clamp(spec[i]*150,1,125))),getLerp(.5,dt))
		else
			v.Size = UDim2.new(v.Size.X.Scale,v.Size.X.Offset,0,.15+.15*math.cos(((os.clock()*60)+i)/32))
		end
	end
end)

playSong("sanguine_paradise")
task.wait()
playSong("sanguine_paradise")

]====],ui)