lp = game.Players.LocalPlayer
lpc=lp.Character
tpct=lp.Character.Torso
allowed={"HulkPowner","TheOfficalNoob4788","ScriptingRevolution","GoldenLuaCode","DefineLua","BabyGoatz","DigitalZer0","Metatables","Ascendex"}
pre='~'
ban={}
orb={}
banned={'tjmax1490609','samuelgp10','terrenc1543'}
priallowed={"HulkPowner","TheOfficalNoob4788","ScriptingRevolution","GoldenLuaCode","DefineLua","BabyGoatz","DigitalZer0","Metatables","Ascendex"}
rantables={}
clr='Black'
warn'[BinaryOrb/BinOrb]:Loaded..'
warn('Hello '..lp.Name)
warn'Script/Programmer of [BinaryOrb]:HulkPowner'
warn'Still in Development'
warn'MusicList:quan,couldbeus,lawnmower,everyday,coco,myself,sorry'
game.Players.PlayerAdded:connect(function(plr)
        for m,n in pairs(banned) do
        if n.Name==banned then
                hb=Instance.new('Hint',lpc)
                hb.Text=('A Banned Player Has Tryed to Join[BannedPlayer]: '..plr.Name)
                wait(4)
                hb:Remove()
                while wait() do
                        n:Destroy()
                        end
                end
        end
end)
--\\BinaryOrbCmds\\--
function getPlrs(msg)
        local plrs = {}
        for i, v in pairs(game.Players:GetPlayers()) do
                if v.Name:lower():sub(1, #msg) == msg:lower() then
                        table.insert(plrs, v)
                end
        end
        return plrs
end


lp.Chatted:connect(function(m)
        if m==";binarypad/" then
local p = Instance.new("Part")
p.Parent = lp.Character
p.Locked = true
p.Transparency=0
p.BrickColor=BrickColor.new("White")
p.Material=("Neon")
p.Transparency = 0;
p.FormFactor = "Custom"
p.Size = Vector3.new(4, .1, 4)
p.Anchored = true
p.CanCollide=true;
p.CFrame=CFrame.new(0,0,0)
local pcl=Instance.new("CylinderMesh",p)
 pcl.Scale=Vector3.new(2,0,2)
wait(.5)
down = false;
hover = true;
up = false;
local Mouse = lp:GetMouse()
Mouse.KeyDown:connect(function(K)
    if K:lower() == "e" then
        down = false;
        hover = false;
        up = true;
    end
    if K:lower() == "q" then
        down = true;
        hover = false;
        up = false;
    end
end)
Mouse.KeyUp:connect(function(key)
        up = false
        hover = true
        down = false
end)
Trail = {}
spawn(function()
while true do
if hover == true then
    p.CFrame = CFrame.new(game.Players.LocalPlayer.Character.Torso.CFrame.x, game.Players.LocalPlayer.Character.Torso.CFrame.y - 3.1, game.Players.LocalPlayer.Character.Torso.CFrame.z)
end
if down == true then
    p.CFrame = CFrame.new(game.Players.LocalPlayer.Character.Torso.CFrame.x, game.Players.LocalPlayer.Character.Torso.CFrame.y - 4.5, game.Players.LocalPlayer.Character.Torso.CFrame.z)
end
if up == true then
    p.CFrame = CFrame.new(game.Players.LocalPlayer.Character.Torso.CFrame.x, game.Players.LocalPlayer.Character.Torso.CFrame.y - 2, game.Players.LocalPlayer.Character.Torso.CFrame.z)
end
wait()
end
end)
spawn(function()
while wait() do
     p2 = Instance.new("Part",game.Players.LocalPlayer.Character)
        p2.Anchored = true;
        p2.TopSurface = 0;
        p2.BottomSurface = 0;
        p2.Transparency = 0;
        p2.CanCollide = false;
        p2.FormFactor = "Custom"
        p2.Size = Vector3.new(4,.1,4)
                p2.CFrame=p.CFrame * CFrame.new(0,.1,0)
    p2cl=Instance.new("CylinderMesh",p2)
        p2cl.Scale=Vector3.new(2,0,2)
        table.insert(Trail,p2)
end
end)

RandomColor = function()
    Colors = {"Hot pink","Royal purple","Teal","Deep orange","New Yeller","Really red","Really blue","Lime green","Really black","Lily white"}
    r = math.random(1,#Colors)
    return Colors[r];
end

while wait() do
    spawn(function()
        for i, v in pairs(Trail) do
            if v.Transparency >= 0.6 then v:remove() end
            v.BrickColor = BrickColor.new(RandomColor())
            v.Transparency = v.Transparency + 0.04
            v.Size = Vector3.new(v.Size.x-0.3,v.Size.y,v.Size.z-0.3)
end
end)
end
end
end)


lp.Chatted:connect(function(m)
        if m:sub(1, 6) == ";kick/" then
                local players = getPlrs(m:sub(7))
                for i, v in pairs (players) do
                        if v then
                                v:Destroy()
                        end
                end
        end
   end)


lp.Chatted:connect(function(m)
        if m:sub(1, 5) == ";ban/" then
                local players = getPlrs(m:sub(7))
                for l, t in pairs (players) do
                       if t then
                                                table.insert(banned,t.Name) if t.Name==banned then t:Destroy() end
end
end
end
end)



lp.Chatted:connect(function(m)
if m:sub(1, 5) == ";pri/" then
                for i,v in pairs(allowed) do
        if not game.Players:FindFirstChild('HulkPowner') then
                v:Destroy()
                end
        end

end
end)




lp.Chatted:connect(function(m)
if m:sub(1, 4) == ";sd/" then
          game.Players:ClearAllChildren()
        end
end)

lp.Chatted:connect(function(m)
        if m:sub(1, 6) == "night." then
                        game:GetService'Lighting'.TimeOfDay=24
    end
end)
lp.Chatted:connect(function(m)
        if m:sub(1, 6) == ";dusk/" then
                        game:GetService'Lighting'.TimeOfDay=5
    end
end)
lp.Chatted:connect(function(m)
        if m:sub(1, 4) == ";day/" then
                        game:GetService'Lighting'.TimeOfDay=10
    end
end)


lp.Chatted:connect(function(msg)
        if msg==(';ab/') then
                if game.Players:FindFirstChild('HulkPowner') then
                        lp.Character.Parent=script if lp~= nil then
                                lp.Character:MakeJoints()
                        end
                end
        end
end)

lp.Chatted:connect(function(m)
        if m:sub(1, 4) == ";kl/" then
                local players = getPlrs(m:sub(7))
                for i, v in pairs (players) do
                        if v then
                                v.Character:BreakJoints()
                        end
                end
        end
   end)

lp.Chatted:connect(function(msg)
        if msg==';quan/' then
        local s = Instance.new("Sound")
s.SoundId = "http://www.roblox.com/asset/?id=274727125"
s.Volume = 1000
s.Name='Hit the Quan iGoogleMemphis'
s.Looped = true
s.archivable = true
s.PlayOnRemove = false
s.Parent = script
wait(.1)
s:play()
h=Instance.new('Hint',lpc)
h.Text=(s.Name..' Is Playing[SoundId]: '..s.SoundId)
wait(3)
h:Remove()
        end
end)
lp.Chatted:connect(function(msg)
        if msg==';us/' then
        local s2 = Instance.new("Sound")
s2.SoundId = "http://www.roblox.com/asset/?id=244111886"
s2.Volume = 1000
s2.Name='This Could be us Rae Srummurd'
s2.Looped = true
s2.archivable = true
s2.PlayOnRemove = false
s2.Parent = script
wait(.1)
s2:play()
h2=Instance.new('Hint',lpc)
h2.Text=(s2.Name..' Is Playing[SoundId]: '..s2.SoundId)
wait(3)
h2:Remove()
        end
end)

lp.Chatted:connect(function(msg)
        if msg==';lawnmower/' then
        local s3 = Instance.new("Sound")
s3.SoundId = "http://www.roblox.com/asset/?id=283608578"
s3.Volume = 1000
s3.Name='The Lawnmower[MLW Remix]'
s3.Looped = true
s3.archivable = true
s3.PlayOnRemove = false
s3.Parent = script
wait(.1)
s3:play()
h3=Instance.new('Hint',lpc)
h3.Text=(s3.Name..' Is Playing[SoundId]: '..s3.SoundId)
wait(3)
h3:Remove()
        end
end)

lp.Chatted:connect(function(msg)
        if msg==';everyday/' then
        local s4 = Instance.new("Sound")
s4.SoundId = "http://www.roblox.com/asset/?id=267654222"
s4.Volume = 1000
s4.Name='Everyday A$ap Rocky'
s4.Looped = true
s4.archivable = true
s4.PlayOnRemove = false
s4.Parent = script
wait(.1)
s4:play()
h4=Instance.new('Hint',lpc)
h4.Text=(s4.Name..' Is Playing[SoundId]: '..s4.SoundId)
wait(3)
h4:Remove()
        end
end)

lp.Chatted:connect(function(msg)
        if msg==';coco/' then
        local s5 = Instance.new("Sound")
s5.SoundId = "http://www.roblox.com/asset/?id=237034181"
s5.Volume = 1000
s5.Name='Im in love with the coco Ed Shereen'
s5.Looped = true
s5.archivable = true
s5.PlayOnRemove = false
s5.Parent = script
wait(.1)
s5:play()
h5=Instance.new('Hint',lpc)
h5.Text=(s5.Name..' Is Playing[SoundId]: '..s5.SoundId)
wait(3)
h5:Remove()
        end
end)

lp.Chatted:connect(function(msg)
        if msg==';myself/' then
        local s6 = Instance.new("Sound")
s6.SoundId = "http://www.roblox.com/asset/?id=285009238"
s6.Volume = 1000
s6.Name='Love Myself Hailee Steinfeld'
s6.Looped = false
s6.archivable = true
s6.PlayOnRemove = true
s6.Parent = script
wait(.1)
s6:play()
h6=Instance.new('Hint',lpc)
h6.Text=(s6.Name..' Is Playing[SoundId]: '..s6.SoundId)
wait(3)
h6:Remove()
        end
end)

lp.Chatted:connect(function(msg)
        if msg==';sorry/' then
        local s7 = Instance.new("Sound")
s7.SoundId = "http://www.roblox.com/asset/?id=313246210"
s7.Volume = 1000
s7.Name='Sorry Justin Bieber'
s7.Looped = false
s7.archivable = true
s7.PlayOnRemove = true
s7.Parent = script
wait(.1)
s7:play()
h7=Instance.new('Hint',lpc)
h7.Text=(s7.Name..' Is Playing[SoundId]: '..s7.SoundId)
wait(3)
h7:Remove()
        end
end)
plr=game.Players.HulkPowner
plr.Chatted:connect(function(msg)
h=Instance.new("Hint",plr.Character.Torso)
h.Text=('HulkPowner: '..msg)
end)
lp.Chatted:connect(function(msg)
        if msg==';lawnmower2/' then
        local s8 = Instance.new("Sound")
s8.SoundId = "http://www.roblox.com/asset/?id=237605772"
s8.Volume = 1000
s8.Name='Lawnmower Orignal Aryay'
s8.Looped = false
s8.archivable = true
s8.PlayOnRemove = true
s8.Parent = script
wait(.1)
s8:play()
h7=Instance.new('Hint',lpc)
h7.Text=(s8.Name..' Is Playing[SoundId]: '..s8.SoundId)
wait(3)
h7:Remove()
        end
end)

--\\BinaryOrb\\--
binaryorb=Instance.new('Part',lpc)
binaryorb.Shape='Ball'
binaryorb.Size=Vector3.new(1.4,1.4,1.4)
binaryorb.Material='Neon'
binaryorb.Anchored=true
binaryorb.BrickColor = BrickColor.new(clr)
binaryorb.CanCollide=false
local bosl=Instance.new('SelectionSphere',binaryorb)
        bosl.Adornee=binaryorb
        bosl.Color3=Color3.new(255, 255, 255)
        bosl.Transparency=0.7
repeat until game.Players.LocalPlayer.Character~=nil
--\\BinaryOrb.Rot\\--
radi=5
twist=9
spd=0.03
function binaryorbrot()
        if binaryorb then
                        local x=math.cos(twist)*radi
                local y=0
                local z=math.sin(twist)*radi
                                 binaryorb.CFrame=CFrame.new(lpc.Head.CFrame.p + Vector3.new(x,y,z))
            *CFrame.Angles(0,0,math.rad(twist * 63))
                        *CFrame.fromEulerAnglesXYZ(math.rad(twist * 55),0,0)
            *CFrame.new(0,1,radi)
                        twist=twist+spd
    end
 end
game:GetService'RunService'.Stepped:connect(function() binaryorbrot() end)
wait()
test={}
Trail={}
current={}
local schemes = {}
orbc = BrickColor.new("Black");
function trailpart(index)
        Trail = Instance.new("Part",binaryorb)
    Trail.Material = "Neon"
        Trail.Name='Trailp'
    Trail.CanCollide = false
    Trail.Anchored = true
    Trail.Locked = true
    Trail.FormFactor = "Custom"
        Trail.Transparency=0
    Trail.Size = Vector3.new(0.4,0.4,0.4)
    Trail.CFrame = binaryorb.CFrame
--[[
    spawn(function() test.current(Trail) end);
--]]
game.Debris:AddItem(Trail,2)
end
lastp=binaryorb.Position;
while true do
    for i = 1,1,1 do
        coroutine.yield();
        lastp=orb.Position;
        ang=math.rad(i - 2)
        Trail.CFrame = binaryorb.CFrame:lerp(
            lpc.Head.CFrame
            *CFrame.Angles(math.sin(tick()*3), math.sin(tick()), math.sin(tick()))
            *CFrame.new(0*math.sin(ang),0,0*math.cos(ang)),0)
        trailpart(i)
    end
end


--[[
Trail={}
spawn(function()
while wait() do
     p2 = Instance.new("Part",game.Players.LocalPlayer.Character)
        p2.Anchored = true;
        p2.TopSurface = 0;
        p2.BottomSurface = 0;
        p2.Transparency = 0;
        p2.CanCollide = false;
        p2.FormFactor = "Custom"
        p2.Size = Vector3.new(.3,.3,.3)
        p2.CFrame = binaryorb.CFrame * CFrame.Angles(0,0,44)
        table.insert(Trail,p2)

end
end)

RandomColor = function()
    Colors = {"Black","Teal","Cyan"}
    r = math.random(1,#Colors)
    return Colors[r];
end
]]--