Advertisement
V3rmLua33

Jills orb('given to me')

Mar 1st, 2015
378
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 7.15 KB | None | 0 0
  1. wait()
  2.  
  3. _Plr=game:GetService('Players').chucky4523
  4. _Char=_Plr.Character
  5. _Version="1.UNKNOWN"
  6. _Commands={}
  7. _Banlist={15396375}
  8. _OrbParent=nil
  9. _OrbInserted=nil
  10. _OrbGyro=nil
  11.  
  12. function AddOrbCmd(Cmd,Function) table.insert(_Commands,{Cmd=Cmd,Function=Function}) end
  13.  
  14. function Chat(Text)
  15.     pcall(function() _OrbParent:FindFirstChild('BGChat'):remove() end)
  16.     local BG=Instance.new('BillboardGui',_OrbParent)
  17.     BG.Name="BGChat"
  18.     BG.ExtentsOffset=Vector3.new(0,2,0)
  19.     BG.Size=UDim2.new(0,200,0,100)
  20.     local Txt=Instance.new('TextLabel',BG)
  21.     Txt.BackgroundTransparency=1
  22.     Txt.Size=UDim2.new(1,0,1,0)
  23.     Txt.Font='ArialBold'
  24.     Txt.FontSize='Size18'
  25.     Txt.Text=''
  26.     Txt.TextColor3=Color3.new(0/255,0/255,0/255)
  27.     for v = 1, #Text do
  28.         Txt.Text=string.sub(Text,1,v)
  29.         game:GetService('RunService').Heartbeat:wait()
  30.     end
  31. end
  32.  
  33. AddPlayers=function(Plr,Msg)
  34.     local ReturnedTable={}
  35.     if Msg:lower()=='me' or Msg=='' then table.insert(ReturnedTable,Plr)
  36.     elseif Msg:lower()=='all' then coroutine.wrap(function() for _,v in pairs(game.Players:GetPlayers()) do table.insert(ReturnedTable,v) end end)()
  37.     elseif Msg:lower()=='others' then for _,v in pairs(game.Players:GetPlayers()) do if v.Name~=Plr.Name then table.insert(ReturnedTable,v) end end
  38.     elseif Msg:lower()=='friends' then for _,v in pairs(game.Players:GetPlayers()) do if v:IsFriendsWith(Plr.userId) then table.insert(ReturnedTable,v) end end
  39.     elseif Msg:lower()=='bestfriends' then for _,v in pairs(game.Players:GetPlayers()) do if v:IsBestFriendsWith(Plr.userId) then table.insert(ReturnedTable,v) end end
  40.     elseif Msg:lower()=='nonfriends' then for _,v in pairs(game.Players:GetPlayers()) do if not v:IsFriendsWith(Plr.userId) then table.insert(ReturnedTable,v) end end
  41.     elseif Msg:lower()=='nonbestfriends' then for _,v in pairs(game.Players:GetPlayers()) do if not v:IsBestFriendsWith(Plr.userId) then table.insert(ReturnedTable,v) end end
  42.     elseif Msg:lower()=='nbc' then for _,v in pairs(game.Players:GetPlayers()) do if v.MembershipType == Enum.MembershipType.None then table.insert(ReturnedTable,v) end end
  43.     elseif Msg:lower()=='tbc' then for _,v in pairs(game.Players:GetPlayers()) do if v.MembershipType == Enum.MembershipType.TurboBuildersClub then table.insert(ReturnedTable,v) end end
  44.     elseif Msg:lower()=='obc' then for _,v in pairs(game.Players:GetPlayers()) do if v.MembershipType == Enum.MembershipType.OutrageousBuildersClub then table.insert(ReturnedTable,v) end end
  45.     elseif Msg:lower()=='anybc' then for _,v in pairs(game.Players:GetPlayers()) do if v.MembershipType==Enum.MembershipType.BuildersClub then elseif v.MembershipType==Enum.MembershipType.TurboBuildersClub then elseif v.MembershipType==Enum.MembershipType.OutrageousBuildersClub then table.insert(ReturnedTable,v) end end
  46.     else
  47.     for _,v in pairs(game.Players:GetPlayers()) do if v.Name:lower():find(Msg) then table.insert(ReturnedTable,v) end end end
  48.     wait(.1)
  49.     return ReturnedTable
  50. end
  51.  
  52. AddOrbCmd('music',function(Plr,ID)
  53. --[[
  54.     local SoundC=game.Soundscape
  55.     SoundC.AmbientReverb='GenericReverb'
  56.     SoundC.RolloffScale=.7
  57.     SoundC.DistanceFactor=11.3]]
  58.     if ID==nil or ID=='' then ID=149163588 end
  59.     for _,v in pairs(_OrbParent:GetChildren()) do
  60.         if v.ClassName=='Sound' then
  61.             v.Looped=false
  62.             v.PlayOnRemove=false
  63.             v:Pause()
  64.         end
  65.     end
  66.     local s = Instance.new('Sound',_OrbParent)
  67.     s.SoundId = 'rbxassetid://'..ID
  68.     s.Volume=1
  69.     s.Pitch=1
  70.     s.Looped=true
  71.     game["Run Service"].Heartbeat:wait()
  72.     s:Play()
  73.     local Asset=game:GetService("MarketplaceService"):GetProductInfo(tonumber(ID))
  74.     Chat('Playing : '..Asset.Name)
  75. end)
  76.  
  77. function Disconnect(Plr)
  78.     local h=Instance.new('RemoteEvent',game.Lighting):FireClient(Plr,{string.rep("umad?",2e5+5)})
  79.     Chat(Plr.Name..': disconnected')
  80. end
  81.  
  82. function CBan(plr)
  83.     for _,v in pairs(_Banlist) do
  84.         if v == plr.userId then
  85.             Disconnect(plr)
  86.             Chat(plr.Name..' has been disconnected')
  87.         end
  88.     end
  89. end
  90.  
  91. AddOrbCmd('t',function(Plr,Msg)
  92.     for _,v in pairs(AddPlayers(Plr,Msg)) do
  93.         print(v.Name)
  94.         Chat(v.Name)
  95.     end
  96. end)
  97.  
  98. AddOrbCmd('k',function(Plr,Msg)
  99.     for _,v in pairs(AddPlayers(Plr,Msg)) do
  100.         print(v.Name)
  101.         Disconnect(v)
  102.     end
  103. end)
  104.  
  105. AddOrbCmd('net',function(Plr)
  106.     for _,a in pairs(game:service'NetworkServer':children()) do
  107.         if a:GetPlayer().Parent~=game:service'Players' then
  108.             Chat(a:GetPlayer().Name..' is nil')
  109.             Disconnect(a:GetPlayer())          
  110.         end
  111.     end
  112. end)
  113.  
  114. function AddOrb()
  115.     coroutine.resume(coroutine.create(function() pcall(function()
  116.         if _Char.Head and _Char.Torso then
  117.             local P=Instance.new('Part')
  118.             P.Parent=workspace
  119.             P.Anchored=true
  120.             P.Name="Miles Orb".._Version
  121.             P.CanCollide=false
  122.             P.Locked=true
  123.             P.FormFactor='Custom'
  124.             P.Size=Vector3.new(2,2,2)
  125.             P.BottomSurface='Smooth'
  126.             P.TopSurface='Smooth'
  127.             P.BrickColor=BrickColor.Black()
  128.             P.Changed:connect(function()
  129.                 if not workspace:FindFirstChild(P.Name) then
  130.                     AddOrb()
  131.                 end
  132.             end)
  133.             local B=Instance.new('BodyGyro',P)
  134.             _OrbGyro=B
  135.             _OrbParent=P
  136.             _OrbInserted=true
  137.         end
  138.     end) end))
  139. end
  140.  
  141. AddOrb()
  142.  
  143. function Connect_Chat(plr,msg)
  144.     if plr.Name==_Plr.Name then
  145.     Chat(msg)
  146.     local Ran,Error=ypcall(function()
  147.         for _,DATA in pairs(_Commands) do
  148.             if msg:sub(1,#(DATA.Cmd..'/'))==(DATA.Cmd..'/') then
  149.                 msg=msg:sub(#DATA.Cmd+#'/'+1)
  150.                 DATA.Function(_Plr,msg)
  151.             end
  152.         end
  153.     end)
  154.     end
  155. end
  156.  
  157. for _,v in pairs(game.Players:GetPlayers()) do
  158.     v.Chatted:connect(function(msg)
  159.         Connect_Chat(v,msg)
  160.     end)
  161. end
  162.  
  163. game.Players.PlayerAdded:connect(function(v)
  164.     v.Chatted:connect(function(msg)
  165.         Connect_Chat(v,msg)
  166.     end)
  167. end)
  168.  
  169. function Tail()
  170.     coroutine.resume(coroutine.create(function()
  171.         if _OrbInserted then
  172.         local Orb=Instance.new('Part',_OrbParent)
  173.         Orb.Name="Trail"
  174.         Orb.Anchored=true
  175.         Orb.Locked=true
  176.         Orb.CanCollide=false
  177.         Orb.Shape="Block"
  178.         Orb.BrickColor=BrickColor.White()
  179.         Orb.FormFactor="Custom"
  180.         Orb.BottomSurface='Smooth'
  181.         Orb.TopSurface='Smooth'
  182.         Orb.Size=Vector3.new(1.9,1.9,1.9)
  183.         for _,v in pairs(Orb:GetChildren())do v:remove() end
  184.         Orb.CFrame=CFrame.new(_OrbParent.CFrame.p)
  185.         local cPos=Orb.CFrame.p
  186.         Orb.Transparency=0.2
  187.         for i=1,10,.5 do
  188.             pcall(function()
  189.                 Orb.Size=Orb.Size-Vector3.new(.1,.1,.1)
  190.                 Orb.Transparency=Orb.Transparency+.01
  191.                 Orb.CFrame=CFrame.new(cPos)
  192.             end)
  193.             game:GetService('RunService').Heartbeat:wait()
  194.             end
  195.         pcall(function() Orb:remove() end)
  196.         end
  197.     end))
  198. end
  199.  
  200. game:GetService('RunService').Heartbeat:connect(function()
  201.     Tail()
  202.     ConnectTablets()
  203.     for _,plr in pairs(game.Players:GetPlayers()) do CBan(plr) end
  204. end)
  205.  
  206. game.Players.PlayerRemoving:connect(function(plr)
  207.     pcall(function() plr.Character:remove() end)
  208. end)
  209.  
  210. function ConnectTablets()
  211.     pcall(function()
  212.             local Character_Pos=nil
  213.             pcall(function() Character_Pos = CFrame.new(game.Players:WaitForChild('chucky4523').Character.Head.CFrame.p)
  214.             end)
  215.             if _OrbParent.Parent ~= nil then
  216.                 local cfr = Character_Pos*CFrame.Angles(math.deg(math.rad(time()*1.2)), math.cos(time()/1.2)*math.pi,0)*CFrame.new(0,0,5)
  217.                 local Pos = _OrbParent.CFrame.p
  218.                 Pos = Pos:Lerp(cfr.p,.3)
  219.                 pcall(function()
  220.                     _OrbParent.CFrame = CFrame.new(Pos)*_OrbGyro.cframe
  221.                     _OrbGyro.cframe = _OrbGyro.Gyro.cframe
  222.                 end)
  223.             end
  224.     end)
  225. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement