local Players = game:GetService("Players")
local UIS = game:GetService("UserInputService")
local SoundService = game:GetService("SoundService")

local player = Players.LocalPlayer
local pGui = player:WaitForChild("PlayerGui")

local old = pGui:FindFirstChild("OBI MUSIC")
if old then old:Destroy() end


-- BLACK SCREEN INTRO

local intro = Instance.new("ScreenGui")
intro.Name = "OBI_INTRO"
intro.Parent = pGui

local frame = Instance.new("Frame")
frame.Size = UDim2.new(1,0,1,0)
frame.BackgroundColor3 = Color3.new(0,0,0)
frame.Parent = intro

local text = Instance.new("TextLabel")
text.Size = UDim2.new(1,0,1,0)
text.BackgroundTransparency = 1
text.TextColor3 = Color3.new(1,1,1)
text.Font = Enum.Font.GothamBold
text.TextSize = 18
text.Parent = frame

local msg = [[
some songs may not work.
if music pass exists then hoverboard/skateboard required.
]]

task.spawn(function()
for i = 1, #msg do
text.Text = string.sub(msg,1,i)
task.wait(0.03)
end
task.wait(2)
intro:Destroy()
end)


-- MAIN GUI

local gui = Instance.new("ScreenGui")
gui.Name = "OBI MUSIC"
gui.Parent = pGui

local main = Instance.new("Frame")
main.Size = UDim2.new(0,400,0,600)
main.Position = UDim2.new(0.5,-200,0.2,0)
main.BackgroundColor3 = Color3.fromRGB(25,25,25)
main.Visible = false
main.Parent = gui
Instance.new("UICorner", main)


-- RGB BUTTON

local obi = Instance.new("TextButton")
obi.Size = UDim2.new(0,90,0,40)
obi.Position = UDim2.new(0,10,0,10)
obi.Text = "OBI"
obi.Parent = gui

task.spawn(function()
while true do
for i = 0,1,0.01 do
obi.BackgroundColor3 = Color3.fromHSV(i,1,1)
task.wait(0.02)
end
end
end)

local drag, dragStart, startPos

obi.InputBegan:Connect(function(i)
if i.UserInputType == Enum.UserInputType.MouseButton1 then
drag = true
dragStart = i.Position
startPos = obi.Position
end
end)

obi.InputEnded:Connect(function()
drag = false
end)

UIS.InputChanged:Connect(function(i)
if drag then
local d = i.Position - dragStart
obi.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + d.X, startPos.Y.Scale, startPos.Y.Offset + d.Y)
end
end)

obi.MouseButton1Click:Connect(function()
main.Visible = not main.Visible
end)


-- SOUND SYSTEM

local sound = Instance.new("Sound")
sound.Volume = 0.5
sound.Parent = SoundService

local list, currentIndex

sound.Ended:Connect(function()
currentIndex += 1
if list and list[currentIndex] then
sound.SoundId = "rbxassetid://" .. list[currentIndex][2]
sound:Play()
end
end)

local function playSong(l,i)
list = l
currentIndex = i

pcall(function()
sound:Stop()
sound.SoundId = "rbxassetid://" .. l[i][2]
sound:Play()
end)
end


-- UI

local scroll = Instance.new("ScrollingFrame")
scroll.Size = UDim2.new(1,0,1,0)
scroll.BackgroundTransparency = 1
scroll.Parent = main

local layout = Instance.new("UIListLayout")
layout.Parent = scroll


-- 🔊 VOLUME SLIDER

local volFrame = Instance.new("Frame")
volFrame.Size = UDim2.new(0.9,0,0,40)
volFrame.Position = UDim2.new(0.05,0,0,0)
volFrame.BackgroundTransparency = 1
volFrame.Parent = main

local sliderBG = Instance.new("Frame")
sliderBG.Size = UDim2.new(0.6,0,0.3,0)
sliderBG.Position = UDim2.new(0.35,0,0.35,0)
sliderBG.BackgroundColor3 = Color3.fromRGB(60,60,60)
sliderBG.Parent = volFrame

local fill = Instance.new("Frame")
fill.Size = UDim2.new(0.5,0,1,0)
fill.BackgroundColor3 = Color3.fromRGB(0,170,255)
fill.Parent = sliderBG

local dragging = false

sliderBG.InputBegan:Connect(function(i)
if i.UserInputType == Enum.UserInputType.MouseButton1 then
dragging = true
end
end)

UIS.InputEnded:Connect(function(i)
if i.UserInputType == Enum.UserInputType.MouseButton1 then
dragging = false
end
end)

UIS.InputChanged:Connect(function(i)
if dragging and i.UserInputType == Enum.UserInputType.MouseMovement then
local x = math.clamp((i.Position.X - sliderBG.AbsolutePosition.X) / sliderBG.AbsoluteSize.X, 0, 1)
fill.Size = UDim2.new(x,0,1,0)
sound.Volume = x
end
end)


-- SECTION SYSTEM

local function makeSection(name,songs)

local header = Instance.new("TextButton")
header.Size = UDim2.new(0.95,0,0,35)
header.Text = "▶ " .. name
header.Parent = scroll

local rows = {}
local open = false

for i,s in ipairs(songs) do
local r = Instance.new("Frame")
r.Size = UDim2.new(0.95,0,0,35)
r.Visible = false
r.Parent = scroll

local b = Instance.new("TextButton")
b.Size = UDim2.new(1,0,1,0)
b.Text = s[1]
b.Parent = r

b.MouseButton1Click:Connect(function()
playSong(songs,i)
end)

table.insert(rows,r)
end

header.MouseButton1Click:Connect(function()
open = not open
for _,r in ipairs(rows) do
r.Visible = open
end
end)

end


-- SONG LISTS

makeSection("ENGLISH", {
{"Mockingbirds",110568958760082},
{"Summer",1842690955},
{"Fire",90091311847595},
{"GOLDEN BROWN",128161090984145},
{"LOVE STORY",71000129176680},
{"LOVE STORY 2",1843265162},
{"NO SMOKING",9047105533},
{"MEMORY REBOOT",109513311091519},
{"RYANAUR",345871841},
{"GARDEN",1837140532},
{"TEA ROOMS",1842209774},
})

makeSection("HINDI", {
{"Aadat",94103203628909},
{"Mann Mera",88345320570909},
{"Pal Pal",77002121761232},
{"Jhol",121180010622504},
{"Zaroori Tha",90050076108794},
{"Dhun",129981117529204},
{"Haseen",104470188551260},
{"Sasso Ki Mala",120349214701956},
{"RANJHEYA VE",77373466558471},
{"Hai Dil Ye Mera",113792808283128},
{"Rab Kare Tujhko",85476270857623}
})

makeSection("PHONK", {
{"CANLIENTE",105492220688862},
{"NODA TROPICA",88663628557954},
{"SOLO SNA NOCHE",126699590518325},
{"FUNK SIGCURO",96028783423401},
{"TRALALELO",138118304933431},
{"TOMA FUNK",129098116998483},
{"GOTH FUNK",140704128008979},
{"FEMININO DO VAPO FUNK",106317184644394},
{"NADA",132653282474882},
{"BALLERINA",112992401117253},
{"MAMMA MIA",98881456926953},
{"VEM VEM COMIGO",91118930002545},
{"BRAINROT",120032784680199},
{"MONTAGEM XONADA",131841589009936},
{"DRIFT PHONK",80709171471864},
})

makeSection("BHOJPURI", {
{"HAMARA MARAD",131679833636653},
{"DAR LAGE",128470232274219},
{"MOH LELU",95909411418420},
{"NIMBU KHARBUJA",89700384406008},
{"SEJIYA PAR PIYA",87577798625777},
{"BANSURI",79568658897083},
{"TAKI TAKI",117615820552185}
})

makeSection("PUNJABI", {
{"NO VOCAL",1843529971},
{"ANTHEM",95903202203393},
{"AA GAYE OYE",76453914422555},
{"REGRET",92448020258187},
{"DREAM",1842484656},
{"CHEAT",136891850788169},
{"TAARE",122499286379568},
{"JAG CHOR DIA",78465649557695}
})


-- AUTO SIZE

layout:GetPropertyChangedSignal("AbsoluteContentSize"):Connect(function()
scroll.CanvasSize = UDim2.new(0,0,0,layout.AbsoluteContentSize.Y + 20)
end)