local TweenService = game:GetService("TweenService")
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local player = Players.LocalPlayer

------------------------------------------------
-- INTRO
------------------------------------------------

local IntroGui = Instance.new("ScreenGui")
IntroGui.Name = "MertMusicsIntro"
IntroGui.Parent = player:WaitForChild("PlayerGui")
IntroGui.ResetOnSpawn = false

local Frame = Instance.new("Frame", IntroGui)
Frame.Size = UDim2.new(1,0,1,0)
Frame.BackgroundColor3 = Color3.fromRGB(0,0,0)

local Title = Instance.new("TextLabel", Frame)
Title.Size = UDim2.new(1,0,0.3,0)
Title.Position = UDim2.new(0,0,0.35,0)
Title.BackgroundTransparency = 1
Title.Text = "MertMusics"
Title.TextColor3 = Color3.fromRGB(0,255,255)
Title.TextScaled = true
Title.Font = Enum.Font.GothamBlack
Title.TextTransparency = 1

TweenService:Create(Title, TweenInfo.new(1), {TextTransparency = 0}):Play()
task.wait(2)
TweenService:Create(Title, TweenInfo.new(1), {TextTransparency = 1}):Play()
TweenService:Create(Frame, TweenInfo.new(1), {BackgroundTransparency = 1}):Play()

task.wait(1.2)
IntroGui:Destroy()

------------------------------------------------
-- LOADER
------------------------------------------------

local gui = Instance.new("ScreenGui")
gui.Name = "MertMusicsLoader"
gui.Parent = player:WaitForChild("PlayerGui")
gui.ResetOnSpawn = false

local mainFrame = Instance.new("Frame", gui)
mainFrame.Size = UDim2.new(0.35,0,0.35,0)
mainFrame.Position = UDim2.new(0.325,0,0.325,0)
mainFrame.BackgroundColor3 = Color3.fromRGB(20,20,20)
mainFrame.BorderSizePixel = 0
mainFrame.Active = true

local corner = Instance.new("UICorner", mainFrame)
corner.CornerRadius = UDim.new(0,16)

-- Drag sistemi
local dragging, dragInput, dragStart, startPos

local function update(input)
	local delta = input.Position - dragStart
	mainFrame.Position = UDim2.new(
		startPos.X.Scale,
		startPos.X.Offset + delta.X,
		startPos.Y.Scale,
		startPos.Y.Offset + delta.Y
	)
end

mainFrame.InputBegan:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
		dragging = true
		dragStart = input.Position
		startPos = mainFrame.Position

		input.Changed:Connect(function()
			if input.UserInputState == Enum.UserInputState.End then
				dragging = false
			end
		end)
	end
end)

mainFrame.InputChanged:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
		dragInput = input
	end
end)

UserInputService.InputChanged:Connect(function(input)
	if input == dragInput and dragging then
		update(input)
	end
end)

-- Başlık
local title = Instance.new("TextLabel", mainFrame)
title.Size = UDim2.new(1,0,0.18,0)
title.BackgroundTransparency = 1
title.Text = "MertMusics Loader"
title.TextColor3 = Color3.fromRGB(0,255,255)
title.TextScaled = true
title.Font = Enum.Font.GothamBold

-- Orta kutu
local box = Instance.new("Frame", mainFrame)
box.Size = UDim2.new(0.8,0,0.22,0)
box.Position = UDim2.new(0.1,0,0.25,0)
box.BackgroundColor3 = Color3.fromRGB(35,35,35)
box.BorderSizePixel = 0

local boxCorner = Instance.new("UICorner", box)
boxCorner.CornerRadius = UDim.new(0,12)

local boxText = Instance.new("TextLabel", box)
boxText.Size = UDim2.new(1,0,1,0)
boxText.BackgroundTransparency = 1
boxText.Text = "MertMusics Universal"
boxText.TextColor3 = Color3.fromRGB(255,255,255)
boxText.TextScaled = true
boxText.Font = Enum.Font.Gotham

-- Açıklama (MÜZİK TEMALI)
local desc = Instance.new("TextLabel", mainFrame)
desc.Size = UDim2.new(0.9,0,0.22,0)
desc.Position = UDim2.new(0.05,0,0.5,0)
desc.BackgroundTransparency = 1
desc.TextWrapped = true
desc.TextYAlignment = Enum.TextYAlignment.Top
desc.Text = "MertMusics - VR için Müzik Hilesi! 🎵\n\nİstediğin şarkıyı oyna, ses seviyesini ayarla.\nOyun içinde müzik keyfi başlasın!"
desc.TextColor3 = Color3.fromRGB(200,200,200)
desc.TextScaled = true
desc.Font = Enum.Font.Gotham

-- Execute Butonu
local executeBtn = Instance.new("TextButton", mainFrame)
executeBtn.Size = UDim2.new(0.6,0,0.15,0)
executeBtn.Position = UDim2.new(0.2,0,0.78,0)
executeBtn.BackgroundColor3 = Color3.fromRGB(0,180,180)
executeBtn.Text = "EXECUTE"
executeBtn.TextColor3 = Color3.fromRGB(0,0,0)
executeBtn.TextScaled = true
executeBtn.Font = Enum.Font.GothamBold

local btnCorner = Instance.new("UICorner", executeBtn)
btnCorner.CornerRadius = UDim.new(0,12)

-- Hover efekti
executeBtn.MouseEnter:Connect(function()
	TweenService:Create(executeBtn, TweenInfo.new(0.2), {
		BackgroundColor3 = Color3.fromRGB(0, 220, 220)
	}):Play()
end)

executeBtn.MouseLeave:Connect(function()
	TweenService:Create(executeBtn, TweenInfo.new(0.2), {
		BackgroundColor3 = Color3.fromRGB(0, 180, 180)
	}):Play()
end)

------------------------------------------------
-- EXECUTE (MÜZİK HİLESİ YÜKLEME)
------------------------------------------------

executeBtn.MouseButton1Click:Connect(function()
	print("MertMusics Execute Pressed!")
	
	-- Butonu yükleniyor moduna al
	executeBtn.Text = "LOADING..."
	executeBtn.BackgroundColor3 = Color3.fromRGB(100, 100, 100)
	executeBtn.AutoButtonColor = false
	
	-- Müzik hilesini yükle
	local success, errorMessage = pcall(function()
		local hileKodu = game:HttpGet("https://pastebin.com/raw/6Vd3YMBa")
		loadstring(hileKodu)()
	end)
	
	if success then
		-- BAŞARILI
		executeBtn.Text = "SUCCESS!"
		executeBtn.BackgroundColor3 = Color3.fromRGB(0, 220, 0)
		
		-- Başarı mesajı
		boxText.Text = "✓ MertMusics Aktif!"
		desc.Text = "MertMusics başarıyla yüklendi! 🎵\n\nMüzik keyfi başlasın!\n\nF9 ile menüyü aç/kapat."
		
		-- 1.5 saniye bekle ve loader'ı kapat
		task.wait(1.5)
		gui:Destroy()
		
	else
		-- HATA
		executeBtn.Text = "ERROR!"
		executeBtn.BackgroundColor3 = Color3.fromRGB(220, 0, 0)
		
		-- Hata mesajı
		boxText.Text = "✗ Yüklenemedi!"
		desc.Text = "MertMusics yüklenirken hata oluştu.\n\nHata: " .. string.sub(tostring(errorMessage), 1, 100) .. "..."
		
		-- Hata detayını konsola yaz
		warn("[MertMusics] Hata: " .. tostring(errorMessage))
		
		-- 3 saniye sonra resetle
		task.wait(3)
		executeBtn.Text = "RETRY"
		executeBtn.BackgroundColor3 = Color3.fromRGB(0, 180, 180)
		executeBtn.AutoButtonColor = true
		boxText.Text = "MertMusics Universal"
		desc.Text = "MertMusics - VR için Müzik Hilesi! 🎵\n\nİstediğin şarkıyı oyna, ses seviyesini ayarla.\nOyun içinde müzik keyfi başlasın!"
	end
end)

------------------------------------------------
-- EK GÜVENLİK
------------------------------------------------

-- Space'e basınca intro'yu atla
UserInputService.InputBegan:Connect(function(input)
    if input.KeyCode == Enum.KeyCode.Space then
        if IntroGui and IntroGui.Parent then
            IntroGui:Destroy()
        end
    end
end)

print("MertMusics Loader Initialized!")
print("Created by Mert - Müzik Hilesi! 🎵")