--[[
    AKATSUKI_N7
    THE FIRST PERSIAN BROOKHAVEN SCRIPT
    PERSIAN EMPIRE EDITION
]]

local Players = game:GetService("Players")
local TweenService = game:GetService("TweenService")
local UIS = game:GetService("UserInputService")
local Lighting = game:GetService("Lighting")

local Player = Players.LocalPlayer

local MusicIDs = {
    "84984611881765",
    "73900259792027",
    "113458227429706",
    "77896802657376",
    "127573313175065",
    "88174966929113",
    "134939857094956",
    "130287388520026",
    "78840475704178",
    "119508813474022",
    "73033233999200",
    "99551853291230"
}

local Gold = Color3.fromRGB(218,174,75)
local Dark = Color3.fromRGB(19,23,31)
local White = Color3.fromRGB(245,240,220)

local GUI = Instance.new("ScreenGui")
GUI.Name = "AKATSUKI_N7"
GUI.ResetOnSpawn = false
GUI.Parent = game:GetService("CoreGui")

local Main = Instance.new("Frame")
Main.Size = UDim2.fromOffset(520,370)
Main.Position = UDim2.new(.5,-260,.5,-185)
Main.BackgroundColor3 = Dark
Main.BorderSizePixel = 0
Main.Parent = GUI

local Corner = Instance.new("UICorner")
Corner.CornerRadius = UDim.new(0,12)
Corner.Parent = Main

local Stroke = Instance.new("UIStroke")
Stroke.Color = Gold
Stroke.Thickness = 2
Stroke.Parent = Main

local Header = Instance.new("TextLabel")
Header.Size = UDim2.new(1,-50,0,55)
Header.BackgroundColor3 = Color3.fromRGB(32,36,45)
Header.Text = "☀ AKATSUKI_N7 | PERSIAN EMPIRE"
Header.TextColor3 = Gold
Header.TextSize = 17
Header.Font = Enum.Font.GothamBold
Header.Parent = Main

local Close = Instance.new("TextButton")
Close.Size = UDim2.fromOffset(45,45)
Close.Position = UDim2.new(1,-45,0,0)
Close.Text = "X"
Close.TextColor3 = Color3.new(1,1,1)
Close.BackgroundColor3 = Color3.fromRGB(130,35,35)
Close.Parent = Main

Close.MouseButton1Click:Connect(function()
    GUI:Destroy()
end)

local Sidebar = Instance.new("Frame")
Sidebar.Size = UDim2.new(0,145,1,-60)
Sidebar.Position = UDim2.fromOffset(0,60)
Sidebar.BackgroundColor3 = Color3.fromRGB(28,32,42)
Sidebar.Parent = Main

local Content = Instance.new("Frame")
Content.Size = UDim2.new(1,-155,1,-70)
Content.Position = UDim2.fromOffset(150,65)
Content.BackgroundTransparency = 1
Content.Parent = Main

local function Clear()
    for _,v in pairs(Content:GetChildren()) do
        v:Destroy()
    end
end

local function Label(text,y)
    local L = Instance.new("TextLabel")
    L.Size = UDim2.new(1,-10,0,35)
    L.Position = UDim2.fromOffset(5,y)
    L.BackgroundColor3 = Color3.fromRGB(40,46,58)
    L.Text = text
    L.TextColor3 = Gold
    L.Font = Enum.Font.GothamBold
    L.TextSize = 14
    L.Parent = Content
    return L
end

local function Button(text,y,callback)
    local B = Instance.new("TextButton")
    B.Size = UDim2.new(1,-15,0,36)
    B.Position = UDim2.fromOffset(5,y)
    B.BackgroundColor3 = Color3.fromRGB(43,51,64)
    B.TextColor3 = White
    B.Text = text
    B.TextSize = 13
    B.Font = Enum.Font.GothamBold
    B.Parent = Content

    local C = Instance.new("UICorner")
    C.CornerRadius = UDim.new(0,6)
    C.Parent = B

    B.MouseButton1Click:Connect(callback)
    return B
end

local function Intro()
    Clear()
    Label("THE FIRST PERSIAN BROOKHAVEN SCRIPT",5)
    Label("CREATOR: AKATSUKI_N7",50)
    Label("PERSIAN EMPIRE EDITION",95)
    Label("Hoping for the freedom of Iran",140)
end

local function PlayerMenu()
    Clear()
    Label("PLAYER SETTINGS",5)

    local speed = 16
    local jump = 50

    Button("SPEED +",50,function()
        speed = math.min(speed+5,100)
        local h = Player.Character and
            Player.Character:FindFirstChildOfClass("Humanoid")
        if h then h.WalkSpeed = speed end
    end)

    Button("JUMP +",95,function()
        jump = math.min(jump+10,150)
        local h = Player.Character and
            Player.Character:FindFirstChildOfClass("Humanoid")
        if h then h.JumpPower = jump end
    end)

    Button("RESET SETTINGS",140,function()
        speed = 16
        jump = 50
        local h = Player.Character and
            Player.Character:FindFirstChildOfClass("Humanoid")
        if h then
            h.WalkSpeed = 16
            h.JumpPower = 50
        end
    end)
end

local function MusicMenu()
    Clear()
    Label("PERSIAN MUSIC PLAYER",5)

    for i,id in ipairs(MusicIDs) do
        Button("MUSIC "..i.." | PLAY",45+(i-1)*42,function()
            local sound = Instance.new("Sound")
            sound.SoundId = "rbxassetid://"..id
            sound.Volume = 0.5
            sound.Parent = workspace
            sound:Play()
            sound.Ended:Connect(function()
                sound:Destroy()
            end)
        end)
    end
end

local function TrollMenu()
    Clear()
    Label("VISUAL EFFECTS",5)

    Button("SCREEN SHAKE",50,function()
        local camera = workspace.CurrentCamera
        if camera then
            local original = camera.CFrame
            for i=1,8 do
                camera.CFrame = original *
                    CFrame.new(
                        math.random(-10,10)/100,
                        math.random(-10,10)/100,
                        0
                    )
                task.wait(.04)
            end
            camera.CFrame = original
        end
    end)

    Button("EXPLOSION VISUAL",95,function()
        local p = Instance.new("Part")
        p.Anchored = true
        p.CanCollide = false
        p.Shape = Enum.PartType.Ball
        p.Material = Enum.Material.Neon
        p.Color = Gold
        p.Size = Vector3.new(1,1,1)
        p.CFrame = workspace.CurrentCamera.CFrame *
            CFrame.new(0,0,-12)
        p.Parent = workspace

        TweenService:Create(p,TweenInfo.new(.5),
            {Size=Vector3.new(12,12,12),Transparency=1}
        ):Play()

        task.wait(.6)
        p:Destroy()
    end)
end

local function RGBMenu()
    Clear()
    Label("RGB EVERYTHING",5)

    Button("RGB CHARACTER",50,function()
        local character = Player.Character
        if character then
            for _,v in pairs(character:GetDescendants()) do
                if v:IsA("BasePart") then
                    TweenService:Create(v,TweenInfo.new(1),{
                        Color=Color3.fromRGB(
                            math.random(0,255),
                            math.random(0,255),
                            math.random(0,255)
                        )
                    }):Play()
                end
            end
        end
    end)
end

local function VehicleMenu()
    Clear()
    Label("VEHICLE SETTINGS",5)
    Label("Vehicle settings require game-supported access.",55)
    Button("RGB SCREEN EFFECT",105,function()
        Lighting.Ambient = Gold
    end)
end

local function YouMenu()
    Clear()
    Label("YOUR CHARACTER",5)

    Button("FIRE VISUAL",50,function()
        local character = Player.Character
        local root = character and
            character:FindFirstChild("HumanoidRootPart")
        if root then
            local fire = Instance.new("Fire")
            fire.Size = 5
            fire.Heat = 8
            fire.Parent = root
        end
    end)

    Button("REMOVE FIRE",95,function()
        local character = Player.Character
        if character then
            for _,v in pairs(character:GetDescendants()) do
                if v:IsA("Fire") then v:Destroy() end
            end
        end
    end)
end

local function PropMenu()
    Clear()
    Label("PROP",5)
    Label("Personal visual effects only",50)
end

local function EndMenu()
    Clear()
    Label("THE FIRST PERSIAN BROOKHAVEN SCRIPT",5)
    Label("Thank you for your choice.",55)
    Label("Hoping for the freedom of Iran",100)

    Button("CLOSE SCRIPT",150,function()
        GUI:Destroy()
    end)
end

local tabs = {
    {"INTRODUCTION",Intro},
    {"PLAYER",PlayerMenu},
    {"MUSIC",MusicMenu},
    {"TROLL",TrollMenu},
    {"RGB EVERYTHING",RGBMenu},
    {"VEHICLE",VehicleMenu},
    {"YOU",YouMenu},
    {"PROP",PropMenu},
    {"END",EndMenu}
}

for i,tab in ipairs(tabs) do
    local B = Instance.new("TextButton")
    B.Size = UDim2.new(1,-8,0,32)
    B.Position = UDim2.fromOffset(4,5+(i-1)*37)
    B.BackgroundColor3 = Color3.fromRGB(48,55,68)
    B.Text = tab[1]
    B.TextColor3 = Gold
    B.Font = Enum.Font.GothamBold
    B.TextSize = 11
    B.Parent = Sidebar

    B.MouseButton1Click:Connect(tab[2])
end

-- DRAG WINDOW
local dragging = false
local dragStart, startPos

Header.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 then
        dragging = true
        dragStart = input.Position
        startPos = Main.Position
    end
end)

UIS.InputChanged:Connect(function(input)
    if dragging and input.UserInputType ==
        Enum.UserInputType.MouseMovement then
        local delta = input.Position-dragStart
        Main.Position = UDim2.new(
            startPos.X.Scale,startPos.X.Offset+delta.X,
            startPos.Y.Scale,startPos.Y.Offset+delta.Y
        )
    end
end)

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

Intro()