Advertisement
Guest User

orbnarb

a guest
Dec 17th, 2014
194
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 4.62 KB | None | 0 0
  1. Creator = 'aceahmedmoh'
  2. Player = game.Players[Creator]
  3. Char = Player.Character
  4. local chat = game:GetService("Chat")
  5.  
  6. Bet = ";"
  7.  
  8.  
  9.  
  10. Orb = Instance.new("Part")
  11. Orb.Parent = game.Workspace
  12. Orb.Shape = "Ball"
  13. Orb.Transparency = .5
  14. Orb.Size = Vector3.new(1,1,1)
  15. Orb.Material = "SmoothPlastic"
  16. Orb.BottomSurface='Smooth'
  17. Orb.BrickColor = BrickColor.new("Really black")
  18. Orb.Name = "Orb"
  19. Orb.CanCollide = false
  20. Orb.Anchored=true
  21.  
  22.  
  23.  
  24. local Loop = coroutine.wrap(function()
  25.         while wait(0) do
  26. for i=1,360 do wait(0)
  27. Orb.CFrame=Char.Head.CFrame*CFrame.Angles(0,math.rad(i),0)*CFrame.new(1.5,0,-5)
  28. end
  29.         end
  30. end)
  31. Loop()
  32.  
  33. fc = function(n)
  34.     for i,v in pairs(game.Players:children()) do
  35.         if v.Name:lower():sub(1,#n) == n then
  36.             return v.Character or v.CharacterAdded:wait()
  37.         end
  38.     end
  39. end
  40.  
  41.  
  42.  
  43. function onChatted(msg, plr)
  44.    
  45.         if (plr.Name == Creator) then
  46.         chat:Chat(Orb,msg, "Blue")            
  47.     end
  48.         if(plr.Name==Creator)then      
  49.                 if(msg:lower():sub(1,1+Bet:len())=='m'..Bet:lower())then
  50.                         local rest=msg:sub(1+Bet:len()+1,#msg);
  51.                         local Msg=Instance.new('Message',workspace);
  52.                                 Msg.Text=rest;
  53.                                 game:service'Debris':addItem(Msg,5);
  54.                                 print'a';
  55.  
  56.  
  57. elseif(msg:lower():sub(1,1+Bet:len())=='h'..Bet:lower())then
  58.                         local rest=msg:sub(1+Bet:len()+1,#msg);
  59.                         local Hint=Instance.new('Hint',workspace);
  60.                                 Hint.Text=rest;
  61.                                 wait(5)
  62.                                                                 Hint:Destroy()
  63.                                 print'b';
  64. end
  65.  
  66.  
  67. if msg:lower():sub(1,4+Bet:len()) == 'kill'..Bet:lower() then
  68.                                         local tokill = fc(msg:lower():sub(4+Bet:len()+1))
  69.                                         if tokill then tokill:BreakJoints() end
  70.  
  71. elseif(msg:lower():sub(1,3+Bet:len())=='mes'..Bet:lower())then
  72.                                                 local rest=msg:sub(3+Bet:len()+1,#msg);
  73.                                                 for _,v in next, game:service'Players':players()do
  74.                                                         Spawn(function() -- new thread, same as coroutine.wrap shorter thou
  75.                                                                 local MsgGUI = Instance.new("ScreenGui")
  76.                                                                 local MsgBox = Instance.new("TextLabel")
  77.                                                                 local FrameMsg = Instance.new("Frame")FrameMsg.Name = "FrameMsg" FrameMsg.BackgroundColor3 = Color3.new(0,0,0) FrameMsg.BorderSizePixel = 0 FrameMsg.BackgroundTransparency = 1 FrameMsg.Size = UDim2.new(10,0,10,0) FrameMsg.Position = UDim2.new(-5,0,-5,0) FrameMsg.ZIndex = 8
  78.                                                                 MsgGUI.Parent = v:findFirstChild'PlayerGui';
  79.                                                                 MsgBox.Parent = FrameMsg
  80.                                                                 MsgBox.Text = rest
  81.                                                                 MsgBox.Font = "Arial"
  82.                                                                 MsgBox.BackgroundColor3 = Color3.new(120, 120, 120)
  83.                                                                 MsgBox.Transparency = .5
  84.                                                                 MsgBox.BorderColor3 = Color3.new(27, 42, 53)
  85.                                                                 MsgBox.Size = UDim2.new(0.05, 0, 0.05, 0)
  86.                                                                 MsgBox.Position = UDim2.new(-.25, 0, .25, 0)
  87.                                                                 MsgBox:TweenSizeAndPosition(UDim2.new(.5, 0, .5, 0), UDim2.new(.25, 0, .25, 0), "Out", "Quad", 2);
  88.                                                                 wait(5);--Change to fix delay
  89.                                                                 MsgBox:TweenSizeAndPosition(UDim2.new(0,0,0,0),UDim2.new(1.5,0,.25,0),'Out','Quad',2);
  90.                                                                 wait(2);
  91.                                                                 MsgGUI:Destroy();
  92.                                                         end);--End that thread
  93.                                                 end;
  94.                                                
  95.                                                
  96. end
  97.         end
  98.                 end
  99.  
  100.  
  101.  
  102. Player.Chatted:connect(function(msg)
  103.         onChatted(msg, Player)
  104. end)
  105. game.Players.PlayerAdded:connect(function(player)
  106.     player.Chatted:connect(function(message) onChatted(message, player) end)
  107. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement