Orion

-- made by 12GaugeNick
-- Never completed
-- run local
wait()

local Plr = nil
if script.ClassName ~= 'Script' then
    Plr = game.Players.LocalPlayer
else
    Plr = game.Players['12gaugenick']
end
local Char = Plr.Character
local PGUI = Plr:FindFirstChild('PlayerGui',true) or Plr:WaitForChild('PlayerGui')
local PBACK = Plr:FindFirstChild('Backpack',true) or Plr:WaitForChild('Backpack')
local Mouse = Plr:GetMouse()
local Cam = workspace.CurrentCamera
local GUIColor = 'Lime green'
local MenuVisible = false

script.Parent = PGUI

local MusicSettings = {
    MV = 'high', -- muted, medium, high

}
local Songs = {
    142963968, 163880175, 222686057, 131717468, 181173563, 150740745, 152324067, 144626383, 145154929
}

function GetProductData(id,data)
    return tostring(game:service'MarketplaceService':GetProductInfo(id)[data])
end

function PLoad(id)
    game:service'ContentProvider':Preload('rbxassetid://'..id)
end

function NewMusic(id)
    for i,v in pairs(Cam:GetChildren()) do
        if v.ClassName == 'Sound' then
            v:Pause()
            v:Stop()
            v:remove()
        end
    end
    PLoad(id)
    local s = Instance.new('Sound',Cam)
    s.SoundId = 'rbxassetid://'..id
    s.Pitch = 1
    s.Volume = 1
    s:Play()
end

GUIColor = BrickColor.new(GUIColor).Color

local TabC1 = nil
local TabC2 = nil
local Fc = nil
local Fc2 = nil

--// Helping funcitons \\--
RUDim = function(a,b,c) return UDim2.new(a,b,c) end
RClr3 = function(a,b,c) return Color3.new(a/255,b/255,c/255) end

--// Tablet \\--
function Note(str)
    local CSID = 145154929
    for i,v in pairs(Cam:GetChildren()) do
        if v.ClassName == 'Sound' then
            CSID = v.SoundId:sub( #('rbxassetid://')+1 )
        end
    end
    NewMusic(205318910)
    PE.Size = RUDim(1,0,0,0)
    PE.Text = (str):gsub('','\5')
    MF:TweenSize(UDim2.new(.94,0,.7,0), "In", "Quad", .53, false, nil)
    MF:TweenPosition(UDim2.new(.03,0,.2,0), "In", "Quad", .53, false, nil)
    PE:TweenSize(UDim2.new(1,0,.15,0), "In", "Quad", .53, false, nil)
    wait(5)
    NewMusic(CSID)
    PE:TweenSize(UDim2.new(1,0,0,0), "In", "Quad", .53, false, nil)
    PE:TweenSize(UDim2.new(.93,0,.77,0), "In", "Quad", .53, false, nil)
    MF:TweenSize(UDim2.new(.94,0,.94,0), "In", "Quad", .53, false, nil)
    MF:TweenPosition(UDim2.new(.03,0,.04,0), "In", "Quad", .53, false, nil)
end

function RunTablets()
    for _,er in pairs(PGUI:GetChildren()) do
        if er.Name == 'ORIONMUSICGUI' then
           er:remove()
        end
    end
    local Tab1 = Instance.new('Part',workspace)
    Tab1.BrickColor = BrickColor.new('Really black')
    Tab1.Transparency = .3
    Tab1.Anchored = true
    Tab1.CanCollide = false
    Tab1.Locked = true
    Tab1.CFrame = Char.Torso.CFrame
    Tab1.FormFactor = 'Custom'
    Tab1.Size = Vector3.new(9,8,.2)
    TabC1 = Tab1
    local TBG = Instance.new('SurfaceGui',PGUI)
    TBG.Adornee = Tab1
    TBG.CanvasSize = Vector2.new(800,600)
    TBG.Face = 'Front'
    TBG.Name = "ORIONMUSICGUI"
    local F = Instance.new('Frame',TBG)
    F.BackgroundColor3 = GUIColor
    F.BackgroundTransparency = .43
    F.BorderSizePixel = 0
    F.Size = RUDim(1,0,1,0)
    Fc = F
    PE = Instance.new('TextLabel',F)
    PE.BackgroundColor3 = RClr3(255,255,255)
    PE.BackgroundTransparency = .4
    PE.BorderSizePixel = 0
    PE.Font = 'ArialBold'
    PE.FontSize = 'Size14'
    PE.TextColor3 = RClr3(0,0,0)
    PE.TextScaled = true
    MF = Instance.new('ScrollingFrame',F)
    MF.BackgroundColor3 = RClr3(255,255,255)
    MF.BackgroundTransparency = .43
    MF.BorderSizePixel = 0
    MF.Position = RUDim(.03,0,.04,0)
    MF.Size = RUDim(.93,0,.94,0)
    MF.ScrollBarThickness = 60
    MF.CanvasSize = RUDim(0,0,5,0)
    game.Players.DescendantAdded:connect(function(plr)
        coroutine.resume(coroutine.create(function()
            if type(plr) == 'userdata' and plr.ClassName == 'Player' and Tab1.Parent ~= nil then
                Note(plr.Name..' entered server')
            end
        end))
    end)
    local GUIOutput = {}
    local Output = function(id)
        id = tonumber(id)
        local SN = GetProductData(id,'Name')
        local TB = Instance.new('TextButton',MF)
        TB.BackgroundColor3 = RClr3(255,255,255)
        TB.BackgroundTransparency = 1
        TB.Size = RUDim(.9,0,.02,0)
        TB.Font = 'ArialBold'
        TB.FontSize = 'Size48'
        TB.TextColor3 = RClr3(129,129,129)
        TB.TextStrokeColor3 = RClr3(0,0,0)
        TB.TextStrokeTransparency = .2
        TB.Text = SN:gsub('','\5')
        TB.Position = RUDim(0,0,#GUIOutput*.02,0)
        TB.TextScaled = true
        TB.MouseButton1Down:connect(function()
            NewMusic(id)
        end)
        table.insert(GUIOutput,TB)
    end
    spawn(function()
        for i,v in pairs(Songs) do
            spawn(function()
                Output( tonumber(v) )
            end)
        end
    end)
    local Tab2 = Instance.new('Part',workspace)
    Tab2.BrickColor = BrickColor.new('Really black')
    Tab2.Transparency = .3
    Tab2.Anchored = true
    Tab2.CanCollide = false
    Tab2.Locked = true
    Tab2.FormFactor = 'Custom'
    Tab2.CFrame = Char.Torso.CFrame
    Tab2.Size = Vector3.new(9,8,.2)
    TabC2 = Tab2
    local TBG2 = Instance.new('SurfaceGui',PGUI)
    TBG2.Adornee = Tab2
    TBG2.CanvasSize = Vector2.new(800,600)
    TBG2.Face = 'Front'
    TBG2.Name = "ORIONMUSICGUI"
    local TB1N = Instance.new('SurfaceGui',Tab1)
    TB1N.Adornee = Tab1
    TB1N.CanvasSize = Vector2.new(800,600)
    TB1N.Face = 'Back'
    local T2N = Instance.new('TextLabel',TB1N)
    T2N.BackgroundColor3 = RClr3(255,255,255)
    T2N.BackgroundTransparency = 1
    T2N.BorderSizePixel = 0
    T2N.Font = 'ArialBold'
    T2N.Size = RUDim(1,0,.1,0)
    T2N.FontSize = 'Size14'
    T2N.Text = 'ORION MUSIC GUI'
    T2N.TextColor3 = RClr3(255,255,255)
    T2N.TextScaled = true
    T2N.TextStrokeColor3 = RClr3(0,0,0)
    T2N.TextStrokeTransparency = .23
    local TB2N = Instance.new('SurfaceGui',Tab2)
    TB2N.Adornee = Tab2
    TB2N.CanvasSize = Vector2.new(800,600)
    TB2N.Face = 'Back'
    local T2N = Instance.new('TextLabel',TB2N)
    T2N.BackgroundColor3 = RClr3(255,255,255)
    T2N.BackgroundTransparency = 1
    T2N.BorderSizePixel = 0
    T2N.Font = 'ArialBold'
    T2N.Size = RUDim(1,0,.1,0)
    T2N.FontSize = 'Size14'
    T2N.Text = 'ORION MUSIC GUI'
    T2N.TextColor3 = RClr3(255,255,255)
    T2N.TextScaled = true
    T2N.TextStrokeColor3 = RClr3(0,0,0)
    T2N.TextStrokeTransparency = .23

    --// RIGHT SIDE \\--
    local FM2 = Instance.new('Frame',TBG2)
    FM2.BackgroundColor3 = GUIColor
    FM2.BackgroundTransparency = .43
    FM2.BorderSizePixel = 0
    FM2.Size = RUDim(1,0,1,0)
    Fc2 = FM2
    local T2N = Instance.new('TextLabel',FM2)
    T2N.BackgroundColor3 = RClr3(255,255,255)
    T2N.BackgroundTransparency = 1
    T2N.BorderSizePixel = 0
    T2N.Font = 'ArialBold'
    T2N.Size = RUDim(1,0,.1,0)
    T2N.FontSize = 'Size14'
    T2N.Text = 'Orion music gui'
    T2N.TextColor3 = RClr3(255,255,255)
    T2N.TextScaled = true
    T2N.TextStrokeColor3 = RClr3(0,0,0)
    T2N.TextStrokeTransparency = .23

    --// Connection frames \\--
    local MusInfo = Instance.new('Frame',TBG2)
    MusInfo.BackgroundColor3 = RClr3(255,255,255)
    MusInfo.BackgroundTransparency = .43
    MusInfo.BorderSizePixel = 0
    MusInfo.Position = RUDim(1.1,0,.2,0)
    MusInfo.Size = RUDim(.9,0,.7,0)
    local MusFExit = Instance.new('TextButton',MusInfo)
    MusFExit.BackgroundColor3 = RClr3(0,0,0)
    MusFExit.BackgroundTransparency = .43
    MusFExit.BorderSizePixel = 0
    MusFExit.Size = RUDim(1,0,.1,0)
    MusFExit.Font = 'ArialBold'
    MusFExit.FontSize = 'Size36'
    MusFExit.Text = 'Exit'
    MusFExit.TextColor3 = RClr3(255,0,0)
    MusFExit.MouseButton1Click:connect(function()
        MusInfo:TweenPosition(UDim2.new(1.1,0,.2,0), "Out", "Quad", .83, false, nil)
        MToggle:TweenPosition(UDim2.new(.58,0,.15,0), "Out", "Quad", .83, false, nil)
        MInfo:TweenPosition(UDim2.new(.1,0,.15,0), "Out", "Quad", .83, false, nil)
        MenuVisible = false
    end)
    local MILabel = Instance.new('ImageLabel',MusInfo)


    local MusToggle = Instance.new('Frame',TBG2)
    MusToggle.BackgroundColor3 = RClr3(255,255,255)
    MusToggle.BackgroundTransparency = .43
    MusToggle.BorderSizePixel = 0
    MusToggle.Position = RUDim(1.1,0,.2,0)
    MusToggle.Size = RUDim(.9,0,.7,0)

    --// ImageLabels \\--
    MInfo = Instance.new('ImageButton',FM2)
    MInfo.BackgroundTransparency = 1
    MInfo.Image = 'rbxassetid://115574122'
    MInfo.Position = RUDim(.1,0,.15,0)
    MInfo.Size = RUDim(.3,0,.3,0)
    local MI2 = Instance.new('TextLabel',MInfo)
    MI2.BackgroundTransparency = 1
    MI2.BorderSizePixel = 0
    MI2.Font = 'ArialBold'
    MI2.Position = UDim2.new(0,0,1,0)
    MI2.Size = RUDim(1,0,.2,0)
    MI2.Font = 'SourceSansBold'
    MI2.FontSize = 'Size36'
    MI2.Text = 'Music info'
    MI2.TextColor3 = RClr3(255,255,255)
    MI2.TextStrokeColor3 = RClr3(0,0,0)
    MI2.TextStrokeTransparency = .73
    MInfo.MouseButton1Click:connect(function()
        if not MenuVisible then
            MenuVisible = true
            MInfo:TweenPosition(UDim2.new(-.3,0,.15,0), "Out", "Quad", .83, false, nil)
        end
    end)
    MToggle = Instance.new('ImageButton',FM2)
    MToggle.BackgroundTransparency = 1
    MToggle.Image = 'rbxassetid://115574122'
    MToggle.Position = RUDim(.58,0,.15,0)
    MToggle.Size = RUDim(.3,0,.3,0)
    local MT1 = Instance.new('TextLabel',MToggle)
    MT1.BackgroundTransparency = 1
    MT1.BorderSizePixel = 0
    MT1.Font = 'ArialBold'
    MT1.Position = UDim2.new(0,0,1,0)
    MT1.Size = RUDim(1,0,.2,0)
    MT1.Font = 'SourceSansBold'
    MT1.FontSize = 'Size36'
    MT1.Text = 'Music settings'
    MT1.TextColor3 = RClr3(255,255,255)
    MT1.TextStrokeColor3 = RClr3(0,0,0)
    MT1.TextStrokeTransparency = .73
    MToggle.MouseButton1Click:connect(function()
        if not MenuVisible then
            MenuVisible = true
            MToggle:TweenPosition(UDim2.new(.05,0,.2,0), "Out", "Quad", .83, false, nil)
            MInfo:TweenPosition(UDim2.new(-.3,0,.15,0), "Out", "Quad", .83, false, nil)
        end
    end)
end

wait()
RunTablets()
--// Color changing \\--
Mouse.KeyDown:connect(function(key)
    if key:lower() == 'z' then -- Color change
        GUIColor = BrickColor.Random().Color
        Fc.BackgroundColor3 = GUIColor
        Fc2.BackgroundColor3 = GUIColor
    elseif key:lower() == 'x' and TabC1.Parent == nil then -- Make tablets come back
        RunTablets()
        wait(3)
        Note('Welcome back, '..Plr.Name..'!')
    elseif key:lower() == 'c' and TabC1.Parent ~= nil then -- Remove tablets
        Note('Dismissing tablets...')
        for i = 0,7,.1 do
            TabC1.Size = TabC1.Size - Vector3.new(.13,.13,.13)
            TabC2.Size = TabC2.Size - Vector3.new(.13,.13,.13)
            game:service'RunService'.Stepped:wait()
        end
        TabC1:remove()
        TabC2:remove()
    end
end)

--// Tablet movement \\--
local function clerp(p1,p2,percent)
    local p1x,p1y,p1z,p1R00,p1R01,p1R02,p1R10,p1R11,p1R12,p1R20,p1R21,p1R22=p1:components()
    local p2x,p2y,p2z,p2R00,p2R01,p2R02,p2R10,p2R11,p2R12,p2R20,p2R21,p2R22=p2:components()
    return CFrame.new(p1x+percent*(p2x-p1x),p1y+percent*(p2y-p1y),p1z+percent*(p2z-p1z),
        p1R00+percent*(p2R00-p1R00),p1R01+percent*(p2R01-p1R01),p1R02+percent*(p2R02-p1R02),
        p1R10+percent*(p2R10-p1R10),p1R11+percent*(p2R11-p1R11),p1R12+percent*(p2R12-p1R12),
        p1R20+percent*(p2R20-p1R20),p1R21+percent*(p2R21-p1R21),p1R22+percent*(p2R22-p1R22))
end

spawn(function()
    game:service'RunService'.Stepped:connect(function()
        if TabC1 ~= nil and TabC2 ~= nil then
        TabC1.CFrame = clerp(TabC1.CFrame,CFrame.new(Char.Torso.CFrame.p)
            * CFrame.new(4.37,1.8,7)
            * CFrame.Angles(math.rad(7),0,0)
            * CFrame.fromEulerAnglesXYZ(0,math.rad(13.4),0)
        ,.09)
        TabC2.CFrame = clerp(TabC2.CFrame,CFrame.new(Char.Torso.CFrame.p)
            * CFrame.new(-4.37,1.8,7)
            * CFrame.Angles(math.rad(7),0,0)
            * CFrame.fromEulerAnglesXYZ(0,math.rad(-13.4),0)
        ,.09)
        end
    end)
end)


delay(2,function()
    Note(Plr.Name..', welcome to Orion music gui!')
end)