SlyHades66

fsdf

Mar 23rd, 2016
200
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 9.45 KB | None | 0 0
  1. --Egg Teleporter
  2. game.Workspace.Eggs.ChildAdded:connect(function(egg)
  3. if string.match(egg.Name, "Fab") or string.match(egg.Name, "Admin") or string.match(egg.Name, "Dragon") then
  4. game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = egg.CFrame
  5. end
  6. end)
  7. wait(0.03)
  8.  
  9. --Eggs
  10. local s = Instance.new("ScreenGui", game.CoreGui)
  11. local f = Instance.new("Frame", s)
  12. f.BackgroundTransparency = 1
  13. f.Position = UDim2.new(0.2,0,0.1,0)
  14. button = Instance.new("TextButton", f)
  15. button.Name = "1"
  16. button.Text = "Teleport Eggs To Player"
  17. button.BackgroundTransparency = 1
  18. button.TextColor3 = Color3.new(255,255,255)
  19. button.Font = "SourceSansBold"
  20. button.FontSize = "Size24"
  21. button.Size = UDim2.new(0,200,0,20)
  22. button.Position = button.Position-UDim2.new(0,55,0,0)
  23.  
  24. local shardsb = Instance.new("TextButton", s)
  25. shardsb.Name = "Shardsb"
  26. shardsb.Text = "Teleport Shards To Player"
  27. shardsb.BackgroundTransparency = 1
  28. shardsb.TextColor3 = Color3.new(255,255,255)
  29. shardsb.Font = "SourceSansBold"
  30. shardsb.FontSize = "Size24"
  31. shardsb.Size = UDim2.new(0,200,0,20)
  32. shardsb.Position = shardsb.Position-UDim2.new(0,-15,-0.28,0)
  33.  
  34. shardsb.MouseButton1Down:connect(function()
  35. function g(o)
  36. for i,v in pairs(o:children())do
  37. if v.ClassName == "WedgePart" then
  38. v.CFrame = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame
  39. end
  40. g(v)
  41. end
  42. end
  43. pcall(g,game.Workspace.Shards)
  44. end)
  45.  
  46. shards = Instance.new("TextButton", s)
  47. shards.Name = "Shards"
  48. shards.Text = "Shards: "..game.ReplicatedStorage.Shards.Value
  49. shards.BackgroundTransparency = 1
  50. shards.TextColor3 = Color3.new(255,255,255)
  51. shards.Font = "SourceSansBold"
  52. shards.FontSize = "Size24"
  53. shards.Size = UDim2.new(0,200,0,20)
  54. shards.Position = shards.Position-UDim2.new(0,0,-0.3,0)
  55.  
  56. game.ReplicatedStorage.Shards.Changed:connect(function()
  57. shards.Text = "Shards: "..game.ReplicatedStorage.Shards.Value
  58. end)
  59.  
  60. button.MouseButton1Down:connect(function()
  61. function g(o)
  62. for i,v in pairs(o:children())do
  63. if v.ClassName == "Part" then
  64. v.CFrame = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame
  65. end
  66. g(v)
  67. end
  68. end
  69. pcall(g,game.Workspace.Eggs)
  70. end)
  71.  
  72. local e = 2
  73. local previousvalue = 1
  74. for i,v in pairs(game.Workspace.Eggs:GetChildren()) do
  75. if f:FindFirstChild('1') then
  76. local q = Instance.new("TextButton", f)
  77. q.Size = UDim2.new(0,200,0,20)
  78. q.BackgroundTransparency = 1
  79. if string.match(q.Text, "Fab") or string.match(q.Text, "Admin") or string.match(q.Text,"Dragon") then
  80. q.TextColor3 = Color3.new(255,0,0)
  81. else
  82. q.TextColor3 = Color3.new(255,255,255)
  83. end
  84. q.Name = e
  85. q.Text = v.Name
  86. q.Font = "SourceSansBold"
  87. q.FontSize = "Size24"
  88. q.Position = f[previousvalue].Position+UDim2.new(0,0,0,28)
  89. previousvalue = e
  90. e = e+1
  91. end
  92. end
  93.  
  94. game.Workspace.Eggs.ChildAdded:connect(function(player)
  95. for i,v in pairs(f:GetChildren()) do
  96. if v.Name ~= "1" then
  97. v:Destroy()
  98. end
  99. end
  100. local e = 2
  101. local previousvalue = 1
  102. for i,v in pairs(game.Workspace.Eggs:GetChildren()) do
  103. if f:FindFirstChild('1') then
  104. local q = Instance.new("TextButton", f)
  105. q.Size = UDim2.new(0,200,0,20)
  106. q.BackgroundTransparency = 1
  107. if string.match(q.Text, "Fab") or string.match(q.Text, "Admin") or string.match(q.Text, "Dragon") then
  108. q.TextColor3 = Color3.new(255,0,0)
  109. else
  110. q.TextColor3 = Color3.new(255,255,255)
  111. end
  112. q.Name = e
  113. q.Text = v.Name
  114. q.Font = "SourceSansBold"
  115. q.FontSize = "Size24"
  116. q.Position = f[previousvalue].Position+UDim2.new(0,0,0,28)
  117. previousvalue = e
  118. e = e+1
  119. end
  120. end
  121. for i,v in pairs(f:GetChildren()) do
  122. if v.Name ~= "1" then
  123. v.MouseButton1Down:connect(function()
  124. function g(o)
  125. for i,c in pairs(o:children())do
  126. if c.Name == v.Text or c.Parent.Name == v.Text or c.Parent.Parent.Name == v.Text or c.Parent.Parent.Parent.Name == v.Text then
  127. if c.ClassName == "Part" then
  128. wait(0.3)
  129. if c.Name == v.Text or c.Parent.Name == v.Text or c.Parent.Parent.Name == v.Text or c.Parent.Parent.Parent.Name == v.Text then
  130. game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = c.CFrame
  131. end
  132. end
  133. end
  134. g(c)
  135. end
  136. end
  137. pcall(g,game.Workspace.Eggs)
  138. end)
  139. end
  140. end
  141. end)
  142. wait(0.03)
  143. for i,v in pairs(f:GetChildren()) do
  144. if v.Name ~= "1" then
  145. v.MouseButton1Down:connect(function()
  146. function g(o)
  147. for i,c in pairs(o:children())do
  148. if c.Name == v.Text or c.Parent.Name == v.Text or c.Parent.Parent.Name == v.Text or c.Parent.Parent.Parent.Name == v.Text then
  149. if c.ClassName == "Part" then
  150. wait(0.3)
  151. if c.Name == v.Text or c.Parent.Name == v.Text or c.Parent.Parent.Name == v.Text or c.Parent.Parent.Parent.Name == v.Text then
  152. game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = c.CFrame
  153. end
  154. end
  155. end
  156. g(c)
  157. end
  158. end
  159. pcall(g,game.Workspace.Eggs)
  160. end)
  161. end
  162. end
  163.  
  164. game.Workspace.Eggs.ChildRemoved:connect(function(removed)
  165. for i,v in pairs(f:GetChildren()) do
  166. if v.Name ~= "1" then
  167. v:Destroy()
  168. end
  169. end
  170. local e = 2
  171. local previousvalue = 1
  172. for i,v in pairs(game.Workspace.Eggs:GetChildren()) do
  173. if f:FindFirstChild('1') then
  174. local q = Instance.new("TextButton", f)
  175. q.Size = UDim2.new(0,200,0,20)
  176. q.BackgroundTransparency = 1
  177. if string.match(q.Text, "Fab") or string.match(q.Text, "Admin") or string.match(q.Text, "Dragon") then
  178. q.TextColor3 = Color3.new(255,0,0)
  179. else
  180. q.TextColor3 = Color3.new(255,255,255)
  181. end
  182. q.Name = e
  183. q.Text = v.Name
  184. q.Font = "SourceSansBold"
  185. q.FontSize = "Size24"
  186. q.Position = f[previousvalue].Position+UDim2.new(0,0,0,28)
  187. previousvalue = e
  188. e = e+1
  189. end
  190. end
  191. for i,v in pairs(f:GetChildren()) do
  192. if v.Name ~= "1" then
  193. v.MouseButton1Down:connect(function()
  194. function g(o)
  195. for i,c in pairs(o:children())do
  196. if c.Name == v.Text or c.Parent.Name == v.Text or c.Parent.Parent.Name == v.Text or c.Parent.Parent.Parent.Name == v.Text then
  197. if c.ClassName == "Part" then
  198. wait(0.3)
  199. if c.Name == v.Text or c.Parent.Name == v.Text or c.Parent.Parent.Name == v.Text or c.Parent.Parent.Parent.Name == v.Text then
  200. game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = c.CFrame
  201. end
  202. end
  203. end
  204. g(c)
  205. end
  206. end
  207. pcall(g,game.Workspace.Eggs)
  208. end)
  209. end
  210. end
  211. end)
  212. wait(0.03)
  213. for i,v in pairs(f:GetChildren()) do
  214. if v.Name ~= "1" then
  215. v.MouseButton1Down:connect(function()
  216. function g(o)
  217. for i,c in pairs(o:children())do
  218. if c.Name == v.Text or c.Parent.Name == v.Text or c.Parent.Parent.Name == v.Text or c.Parent.Parent.Parent.Name == v.Text then
  219. if c.ClassName == "Part" then
  220. wait(0.3)
  221. if c.Name == v.Text or c.Parent.Name == v.Text or c.Parent.Parent.Name == v.Text or c.Parent.Parent.Parent.Name == v.Text then
  222. game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = c.CFrame
  223. end
  224. end
  225. end
  226. g(c)
  227. end
  228. end
  229. pcall(g,game.Workspace.Eggs)
  230. end)
  231. end
  232. end
  233. --Collectibles
  234. wait(3)
  235.  
  236. local s = Instance.new("ScreenGui", game.CoreGui)
  237. local f = Instance.new("Frame", s)
  238. f.BackgroundTransparency = 1
  239. f.Position = UDim2.new(0.8,0,0.1,0)
  240. button = Instance.new("TextButton", f)
  241. button.Name = "1"
  242. button.Text = "Teleport Collectibles To Player"
  243. button.BackgroundTransparency = 1
  244. button.TextColor3 = Color3.new(255,255,255)
  245. button.Font = "SourceSansBold"
  246. button.FontSize = "Size24"
  247. button.Size = UDim2.new(0,200,0,20)
  248. button.Position = button.Position-UDim2.new(0,55,0,0)
  249.  
  250. button.MouseButton1Down:connect(function()
  251. function g(o)
  252. for i,v in pairs(o:children())do
  253. if v.ClassName == "Part" or c.ClassName == "UnionOperation" and c.Transparency == 0 then
  254. v.CFrame = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame
  255. end
  256. g(v)
  257. end
  258. end
  259. pcall(g,game.Workspace.CollectibleItems)
  260. end)
  261.  
  262. local e = 2
  263. local previousvalue = 1
  264. for i,v in pairs(game.Workspace.CollectibleItems:GetChildren()) do
  265. if f:FindFirstChild('1') then
  266. local q = Instance.new("TextButton", f)
  267. q.Size = UDim2.new(0,200,0,20)
  268. q.BackgroundTransparency = 1
  269. q.TextColor3 = Color3.new(255,255,255)
  270. q.Name = e
  271. q.Text = v.Name
  272. q.Font = "SourceSansBold"
  273. q.FontSize = "Size24"
  274. q.Position = f[previousvalue].Position+UDim2.new(0,0,0,28)
  275. previousvalue = e
  276. e = e+1
  277. end
  278. end
  279.  
  280. game.Workspace.CollectibleItems.ChildAdded:connect(function(player)
  281. local q = Instance.new("TextButton", f)
  282. q.Size = UDim2.new(0,200,0,20)
  283. q.BackgroundTransparency = 1
  284. q.TextColor3 = Color3.new(255,255,255)
  285. q.Name = e
  286. q.Text = player.Name
  287. q.Font = "SourceSansBold"
  288. q.FontSize = "Size24"
  289. q.Position = f[previousvalue].Position+UDim2.new(0,0,0,28)
  290. previousvalue = e
  291. e = e+1
  292. end)
  293.  
  294. game.Workspace.CollectibleItems.ChildRemoved:connect(function(removed)
  295. for i,v in pairs(f:GetChildren()) do
  296. if v.Name ~= "1" then
  297. v:Destroy()
  298. end
  299. end
  300. wait(0.03)
  301.  
  302. local e = 2
  303. local previousvalue = 1
  304. for i,v in pairs(game.Workspace.CollectibleItems:GetChildren()) do
  305. if f:FindFirstChild('1') then
  306. local q = Instance.new("TextButton", f)
  307. q.Size = UDim2.new(0,200,0,20)
  308. q.BackgroundTransparency = 1
  309. q.TextColor3 = Color3.new(255,255,255)
  310. q.Name = e
  311. q.Text = v.Name
  312. q.Font = "SourceSansBold"
  313. q.FontSize = "Size24"
  314. q.Position = f[previousvalue].Position+UDim2.new(0,0,0,28)
  315. previousvalue = e
  316. e = e+1
  317. end
  318. end
  319. end)
  320.  
  321. for i,v in pairs(f:GetChildren()) do
  322. if v.Name ~= "1" then
  323. v.MouseButton1Down:connect(function()
  324. function g(o)
  325. for i,c in pairs(o:children())do
  326. if c.Name == v.Text or c.Parent.Name == v.Text or c.Parent.Parent.Name == v.Text or c.Parent.Parent.Parent.Name == v.Text then
  327. if c.ClassName == "Part" or c.ClassName == "UnionOperation" and c.Transparency == 0 then
  328. wait(0.3)
  329. if c.Name == v.Text or c.Parent.Name == v.Text or c.Parent.Parent.Name == v.Text or c.Parent.Parent.Parent.Name == v.Text then
  330. game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = c.CFrame
  331. end
  332. end
  333. end
  334. g(c)
  335. end
  336. end
  337. pcall(g,game.Workspace.CollectibleItems)
  338. end)
  339. end
  340. end
Add Comment
Please, Sign In to add comment