Advertisement
albinio546

Orby

Aug 16th, 2015
235
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.14 KB | None | 0 0
  1. Name = "albinio667" --Put your name. Case sensitive.
  2. Admin = Game.Players[Name]
  3. peritemtime = 1
  4. bantime = 10
  5. ver = 3.3
  6. ------------------------------------------------------------------ Dont edit below here unless you know what you're doing!
  7. char = game.Workspace:findFirstChild(Name)
  8.  
  9. -- Creating the Orb --
  10. mdl = Instance.new("Model",char)
  11. mdl.Name = char.Name .. "'s Orb"
  12.  
  13. orb = Instance.new("Part",mdl)
  14. orb.Size = Vector3.new(2,2,2)
  15. orb.Name = "Head"
  16. orb.BrickColor = BrickColor.new("Really black")
  17. orb.Shape = "Ball"
  18. orb.Transparency = .6
  19. orb.Reflectance = .3
  20.  
  21. human = Instance.new("Humanoid",mdl)
  22. human.MaxHealth = 0
  23. human.Health = 0
  24.  
  25. bp = Instance.new("BodyPosition",orb)
  26. bp.maxForce = Vector3.new(math.huge,math.huge,math.huge)
  27. coroutine.resume(coroutine.create(function()
  28. while wait() do
  29. bp.position = char.Head.Position + Vector3.new(0,5,0)
  30. end
  31. end))
  32.  
  33. bg = Instance.new("BodyGyro",orb)
  34. bg.maxTorque = Vector3.new(math.huge,math.huge,math.huge)
  35. ------------------------------------------------------------------
  36.  
  37. ----------------
  38. h = Instance.new("Hint")
  39. h.Parent = Admin
  40. h.Text = "Say 'Commands' to see a list of the orb's capabilities. Case-sensitive! -Stewiepwns"
  41. ------------------------------------------------------------------
  42.  
  43. ----------------
  44. function onChatted(msg)
  45.  
  46. if msg=="Orb give insert" then
  47. adminper = game.Workspace:findFirstChild(Admin.Name)
  48. if adminper~=nil then
  49. M = Game:GetService("InsertService"):LoadAsset(23456449)
  50. M.Parent = Game.Workspace
  51. M:MakeJoints()
  52. M:MoveTo(adminper.Torso.Position + Vector3.new(0, 0, 0))
  53. end end
  54.  
  55. if msg=="Orb go blue" then
  56. orb.BrickColor = BrickColor.new("Really blue")
  57. end
  58.  
  59. if msg=="Orb go red" then
  60. orb.BrickColor = BrickColor.new("Really red")
  61. end
  62.  
  63. if msg=="Orb go green" then
  64. orb.BrickColor = BrickColor.new("Earth green")
  65. end
  66.  
  67. if msg=="Orb go purple" then
  68. orb.BrickColor = BrickColor.new("Royal purple")
  69. end
  70.  
  71. if msg=="Orb remove base" then
  72. local base = game.Workspace:findFirstChild("Base")
  73. if base~=nil then
  74. local m = Instance.new("Message")
  75. m.Parent = game.Workspace
  76. m.Text = "Orb, I command you to remove this base!"
  77. wait(3)
  78. m.Text = ""
  79. mdl.Name = "Do you really think I should?"
  80. wait(3)
  81. m.Text = "Why, yes, yes I do."
  82. wait(3)
  83. m:Remove()
  84. mdl.Name = "OK! :D"
  85. wait(3)
  86. base:Remove()
  87. mdl.Name = char.Name .. "'s Orb"
  88. else
  89. local m = Instance.new("Message")
  90. m.Parent = game.Workspace
  91. m.Text = "Orb, I command you to remove this base!"
  92. wait(3)
  93. m.Text = ""
  94. mdl.Name = "But... There is no base!"
  95. wait(3)
  96. m.Text = "...Oh. Silly me. *Facedesk*"
  97. wait(3)
  98. m:Remove()
  99. mdl.Text = "Lol. :D"
  100. wait(3)
  101. mdl.Name = char.Name .. "'s Orb"
  102. end end
  103.  
  104. if msg=="Commands" then
  105. h.Text = "List of commands:"
  106. wait(3)
  107. h.Text = "Orb wear my hats"
  108. wait(1)
  109. h.Text = "Orb go green"
  110. wait(1)
  111. h.Text = "Orb go blue"
  112. wait(1)
  113. h.Text = "Orb go red"
  114. wait(1)
  115. h.Text = "Orb go purple"
  116. wait(1)
  117. h.Text = "Orb remove base"
  118. wait(1)
  119. h.Text = "Orb kill others"
  120. wait(1)
  121. h.Text = "Orb tele all to me"
  122. wait(1)
  123. h.Text = "Orb make me invisible"
  124. wait(1)
  125. h.Text = "Orb make me visible"
  126. wait(1)
  127. h.Text = "Say 'Commands' to see a list of the orb's capabilities. All commands are case-sensitive! -Stewiepwns"
  128. end
  129.  
  130. if msg=="Orb wear my hats" then
  131. admini = game.Workspace:findFirstChild(Name)
  132. admini = admini:GetChildren()
  133. for i = 1,#admini do
  134. if (admini[i].className == "Hat") then
  135. admini[i].Parent = mdl
  136. hatpos = Instance.new("BodyPosition")
  137. hatpos.Parent = admini[i].Handle
  138. hatpos.maxForce = Vector3.new(math.huge,math.huge,math.huge)
  139. coroutine.resume(coroutine.create(function()
  140. while wait() do
  141. hatpos.position = orb.Position + Vector3.new(0,0.2,0)
  142. end
  143. end))
  144. end end end
  145.  
  146. if msg=="Orb kill others" then
  147. for i,v in pairs (game.Players:GetChildren()) do
  148. if (v.className == "Player") then
  149. if (v.Name ~= Admin.Name) then
  150. dude = game.Workspace:findFirstChild(v.Name)
  151. if dude~=nil then
  152. dude:BreakJoints()
  153. end end end end end
  154.  
  155. if msg=="Orb tele all to me" then
  156. for i,v in pairs (game.Players:GetChildren()) do
  157. if (v.className == "Player") then
  158. if (v.Name ~= Admin.Name) then
  159. dude = game.Workspace:findFirstChild(v.Name)
  160. if dude~=nil then
  161. torso = dude:findFirstChild("Torso")
  162. if torso~=nil then
  163. torso.CFrame = orb.CFrame + Vector3.new(0,10,0)
  164. end end end end end end
  165.  
  166. if msg=="Orb make me invisible" then
  167. local player = game.Workspace:findFirstChild(Name)
  168. if player ~= 0 then
  169. for i = 1,#player do
  170. if player[i].Character ~= nil then
  171. local char = player[i]
  172. local c = player[i]:GetChildren()
  173. for i =1,#c do
  174. if c[i].className == "Hat" then
  175. local handle = c[i]:FindFirstChild("Handle")
  176. if handle ~= nil then
  177. handle.Transparency = 1 --We dont want our hats to give off our position, do we?
  178. end end
  179. if c[i].className == "Part" then
  180. c[i].Transparency = 1
  181. if c[i].Name == "Torso" then
  182. local tshirt = c[i]:FindFirstChild("roblox")
  183. if tshirt ~= nil then
  184. tshirt:clone().Parent = char
  185. tshirt:remove()
  186. end end
  187. if c[i].Name == "Head" then
  188. local face = c[i]:FindFirstChild("face")
  189. if face ~= nil then
  190. gface = face:clone()
  191. face:remove()
  192. end end end end end end end end
  193.  
  194. if msg=="Orb make me visible" then
  195. local player = game.Workspace:findFirstChild(Name)
  196. if player ~= 0 then
  197. for i = 1,#player do
  198. if player[i] ~= nil then
  199. local char = player[i]
  200. local c = player[i].Character:GetChildren()
  201. for i =1,#c do
  202. if c[i].className == "Hat" then
  203. local handle = c[i]:FindFirstChild("Handle")
  204. if handle ~= nil then
  205. handle.Transparency = 0
  206. end end
  207. if c[i].className == "Part" then
  208. c[i].Transparency = 0
  209. if c[i].Name == "Torso" then
  210. local tshirt = char:FindFirstChild("roblox")
  211. if tshirt ~= nil then
  212. tshirt:clone().Parent = c[i]
  213. tshirt:remove()
  214. end end
  215. if c[i].Name == "Head" then
  216. if gface ~= nil then
  217. local face = gface:clone()
  218. face.Parent = c[i]
  219. end end end end end end end end
  220.  
  221.  
  222. if msg=="Orb attract people" then
  223. noobs = game.Workspace:GetChildren()
  224. for i = 1,#noobs do
  225. if (noobs[i].className == "Model") then
  226. if (noobs[i].Name ~= Admin.Name) then
  227. local h = noobs[i]:findFirstChild("Humanoid")
  228. if h~=nil then
  229. hatpos = Instance.new("BodyPosition")
  230. hatpos.Parent = noobs[i].Torso
  231. hatpos.maxForce = Vector3.new(math.huge,math.huge,math.huge)
  232. coroutine.resume(coroutine.create(function()
  233. while wait() do
  234. hatpos.position = orb.Position + Vector3.new(0,0,0)
  235. hatpos.Name = "Playerattraction"
  236. end
  237. end))
  238. end end end end end
  239.  
  240.  
  241.  
  242. if msg=="Orb stop attracting people" then
  243. noobs = game.Workspace:GetChildren()
  244. for i = 1,#noobs do
  245. if (noobs[i].className == "Model") then
  246. if (noobs[i].Name ~= Admin.Name) then
  247. local h = noobs[i]:findFirstChild("Humanoid")
  248. if h~=nil then
  249. local Playerattraction = noobs[i].Torso:findFirstChild("Playerattraction")
  250. if Playerattraction~=nil then
  251. Playerattraction:Remove()
  252. end end end end end end
  253.  
  254. if msg=="Orbfire" then
  255. orbfire = Instance.new("Fire")
  256. orbfire.Size = 6
  257. orbfire.Heat = 30
  258. orbfire.Name = "Orbfire"
  259. orbfire.Parent = orb
  260. end
  261.  
  262. if msg=="Orbfire remove" then
  263. pwn = orb:findFirstChild("Orbfire")
  264. if pwn~=nil then
  265. pwn:Remove()
  266. end end
  267.  
  268. if msg=="Control orb" then
  269. Admin.Character = mdl
  270. end end
  271.  
  272.  
  273. Admin.Chatted:connect(onChatted)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement