Advertisement
Guest User

orbnarb

a guest
Dec 17th, 2014
196
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 4.56 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. Orb.CFrame=Char.Head.CFrame*CFrame.new(-2,0,0)
  27.         end
  28. end)
  29. Loop()
  30.  
  31. fc = function(n)
  32.     for i,v in pairs(game.Players:children()) do
  33.         if v.Name:lower():sub(1,#n) == n then
  34.             return v.Character or v.CharacterAdded:wait()
  35.         end
  36.     end
  37. end
  38.  
  39.  
  40.  
  41. function onChatted(msg, plr)
  42.    
  43.         if (plr.Name == Creator) then
  44.         chat:Chat(Orb,msg, "Blue")            
  45.     end
  46.         if(plr.Name==Creator)then      
  47.                 if(msg:lower():sub(1,1+Bet:len())=='m'..Bet:lower())then
  48.                         local rest=msg:sub(1+Bet:len()+1,#msg);
  49.                         local Msg=Instance.new('Message',workspace);
  50.                                 Msg.Text=rest;
  51.                                 game:service'Debris':addItem(Msg,5);
  52.                                 print'a';
  53.  
  54.  
  55. elseif(msg:lower():sub(1,1+Bet:len())=='h'..Bet:lower())then
  56.                         local rest=msg:sub(1+Bet:len()+1,#msg);
  57.                         local Hint=Instance.new('Hint',workspace);
  58.                                 Hint.Text=rest;
  59.                                 wait(5)
  60.                                                                 Hint:Destroy()
  61.                                 print'b';
  62. end
  63.  
  64.  
  65. if msg:lower():sub(1,4+Bet:len()) == 'kill'..Bet:lower() then
  66.                                         local tokill = fc(msg:lower():sub(4+Bet:len()+1))
  67.                                         if tokill then tokill:BreakJoints() end
  68.  
  69. elseif(msg:lower():sub(1,3+Bet:len())=='mes'..Bet:lower())then
  70.                                                 local rest=msg:sub(3+Bet:len()+1,#msg);
  71.                                                 for _,v in next, game:service'Players':players()do
  72.                                                         Spawn(function() -- new thread, same as coroutine.wrap shorter thou
  73.                                                                 local MsgGUI = Instance.new("ScreenGui")
  74.                                                                 local MsgBox = Instance.new("TextLabel")
  75.                                                                 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
  76.                                                                 MsgGUI.Parent = v:findFirstChild'PlayerGui';
  77.                                                                 MsgBox.Parent = FrameMsg
  78.                                                                 MsgBox.Text = rest
  79.                                                                 MsgBox.Font = "Arial"
  80.                                                                 MsgBox.BackgroundColor3 = Color3.new(120, 120, 120)
  81.                                                                 MsgBox.Transparency = .5
  82.                                                                 MsgBox.BorderColor3 = Color3.new(27, 42, 53)
  83.                                                                 MsgBox.Size = UDim2.new(0.05, 0, 0.05, 0)
  84.                                                                 MsgBox.Position = UDim2.new(-.25, 0, .25, 0)
  85.                                                                 MsgBox:TweenSizeAndPosition(UDim2.new(.5, 0, .5, 0), UDim2.new(.25, 0, .25, 0), "Out", "Quad", 2);
  86.                                                                 wait(5);--Change to fix delay
  87.                                                                 MsgBox:TweenSizeAndPosition(UDim2.new(0,0,0,0),UDim2.new(1.5,0,.25,0),'Out','Quad',2);
  88.                                                                 wait(2);
  89.                                                                 MsgGUI:Destroy();
  90.                                                         end);--End that thread
  91.                                                 end;
  92.                                                
  93.                                                
  94. end
  95.         end
  96.                 end
  97.  
  98.  
  99.  
  100. Player.Chatted:connect(function(msg)
  101.         onChatted(msg, Player)
  102. end)
  103. game.Players.PlayerAdded:connect(function(player)
  104.     player.Chatted:connect(function(message) onChatted(message, player) end)
  105. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement