thi2004

Gui Dragon Keeper Update

Sep 22nd, 2018
1,834
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 19.41 KB | None | 0 0
  1. -- Farewell Infortality.
  2. -- Version: 2.82
  3. -- Instances:
  4. local ScreenGui = Instance.new("ScreenGui")
  5. local Maingui = Instance.new("Frame")
  6. local Title = Instance.new("TextLabel")
  7. local Teleports = Instance.new("TextButton")
  8. local Teleport = Instance.new("Frame")
  9. local OrbsTeleports = Instance.new("TextButton")
  10. local ChestsTeleports = Instance.new("TextButton")
  11. local EggsTeleports = Instance.new("TextButton")
  12. local Script1 = Instance.new("TextLabel")
  13. local Script2 = Instance.new("TextLabel")
  14. local GiveStats = Instance.new("TextButton")
  15. local Owner = Instance.new("TextLabel")
  16. local Closegui = Instance.new("Frame")
  17. local Close = Instance.new("TextButton")
  18. local OpenOther = Instance.new("TextButton")
  19. local Opengui = Instance.new("Frame")
  20. local Open = Instance.new("TextButton")
  21. --Properties:
  22. ScreenGui.Parent = game.CoreGui
  23.  
  24. Maingui.Name = "Maingui"
  25. Maingui.Parent = ScreenGui
  26. Maingui.BackgroundColor3 = Color3.new(1, 1, 1)
  27. Maingui.Position = UDim2.new(0.161684796, 0, 0.199203193, 0)
  28. Maingui.Size = UDim2.new(0, 389, 0, 324)
  29. Maingui.Visible = false
  30. Maingui.Style = Enum.FrameStyle.DropShadow
  31. Maingui.Active = true
  32. Maingui.Draggable = true
  33.  
  34. Title.Name = "Title"
  35. Title.Parent = Maingui
  36. Title.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  37. Title.Position = UDim2.new(0.00257069431, 0, -0.00617283955, 0)
  38. Title.Size = UDim2.new(0, 350, 0, 27)
  39. Title.Font = Enum.Font.SourceSans
  40. Title.Text = "Dragon Keeper Gui"
  41. Title.TextColor3 = Color3.new(1, 0, 0)
  42. Title.TextSize = 14
  43.  
  44. Teleports.Name = "Teleports"
  45. Teleports.Parent = Maingui
  46. Teleports.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  47. Teleports.Position = UDim2.new(0.246786624, 0, 0.141975313, 0)
  48. Teleports.Size = UDim2.new(0, 171, 0, 52)
  49. Teleports.Font = Enum.Font.SourceSans
  50. Teleports.Text = "Teleports"
  51. Teleports.TextColor3 = Color3.new(1, 0, 0)
  52. Teleports.TextSize = 14
  53. Teleports.MouseButton1Down:connect(function()
  54. Teleport.Visible = true
  55. end)
  56.  
  57. Teleport.Name = "Teleport"
  58. Teleport.Parent = Teleports
  59. Teleport.BackgroundColor3 = Color3.new(1, 1, 1)
  60. Teleport.Position = UDim2.new(1.67251456, 0, -1.01923084, 0)
  61. Teleport.Size = UDim2.new(0, 262, 0, 314)
  62. Teleport.Visible = false
  63. Teleport.Style = Enum.FrameStyle.DropShadow
  64. Teleport.Active = true
  65. Teleport.Draggable = true
  66.  
  67. OrbsTeleports.Name = "Orbs Teleports"
  68. OrbsTeleports.Parent = Teleport
  69. OrbsTeleports.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  70. OrbsTeleports.Position = UDim2.new(0.148144692, 0, 0.078182742, 0)
  71. OrbsTeleports.Size = UDim2.new(0, 171, 0, 52)
  72. OrbsTeleports.Font = Enum.Font.SourceSans
  73. OrbsTeleports.Text = "Orbs Teleport"
  74. OrbsTeleports.TextColor3 = Color3.new(1, 0, 0)
  75. OrbsTeleports.TextSize = 14
  76. OrbsTeleports.MouseButton1Down:connect(function()
  77. for i, v in pairs(workspace.Orbs:GetChildren())do
  78. if(v.PrimaryPart)then
  79. v.PrimaryPart.CFrame = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame
  80. end
  81. end
  82. end)
  83.  
  84. ChestsTeleports.Name = "Chests Teleports"
  85. ChestsTeleports.Parent = Teleport
  86. ChestsTeleports.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  87. ChestsTeleports.Position = UDim2.new(0.151961491, 0, 0.377545804, 0)
  88. ChestsTeleports.Size = UDim2.new(0, 171, 0, 52)
  89. ChestsTeleports.Font = Enum.Font.SourceSans
  90. ChestsTeleports.Text = "Chests Teleport"
  91. ChestsTeleports.TextColor3 = Color3.new(1, 0, 0)
  92. ChestsTeleports.TextSize = 14
  93. ChestsTeleports.MouseButton1Down:connect(function()
  94. for i, v in pairs(workspace.Gathering.Gold['Spawn-V2']:GetChildren())do
  95. if(v:FindFirstChild('Small'))then
  96. print 'Found a small chest'
  97. v.Small.PrimaryPart.CFrame = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame
  98. elseif(v:FindFirstChild('Medium'))then
  99. print 'Found a medium chest'
  100. v.Medium.PrimaryPart.CFrame = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame
  101. elseif(v:FindFirstChild('Large'))then
  102. print 'Found a Large chest'
  103. v.Large.PrimaryPart.CFrame = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame
  104. end
  105. wait(1)
  106. end
  107. end)
  108.  
  109. EggsTeleports.Name = "Eggs Teleports"
  110. EggsTeleports.Parent = Teleport
  111. EggsTeleports.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  112. EggsTeleports.Position = UDim2.new(0.148144692, 0, 0.667354763, 0)
  113. EggsTeleports.Size = UDim2.new(0, 171, 0, 52)
  114. EggsTeleports.Font = Enum.Font.SourceSans
  115. EggsTeleports.Text = "Eggs Teleport"
  116. EggsTeleports.TextColor3 = Color3.new(1, 0, 0)
  117. EggsTeleports.TextSize = 14
  118. EggsTeleports.MouseButton1Down:connect(function()
  119. for i, v in pairs(workspace.EggSpawnZones['Spawn-V2']:GetChildren())do
  120. if(v:FindFirstChild('DragonEgg'))then
  121. print 'Found an egg!'
  122. v.DragonEgg.DragonEgg.CFrame = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame
  123. end
  124. end
  125. end)
  126.  
  127. Script1.Name = "Script1"
  128. Script1.Parent = Teleport
  129. Script1.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  130. Script1.Position = UDim2.new(-0.0152671747, 0, -0.022292994, 0)
  131. Script1.Size = UDim2.new(0, 253, 0, 27)
  132. Script1.Font = Enum.Font.SourceSans
  133. Script1.Text = "Scripts Belong to V3rmillion"
  134. Script1.TextColor3 = Color3.new(1, 0, 0)
  135. Script1.TextSize = 14
  136.  
  137. Script2.Name = "Script2"
  138. Script2.Parent = Teleport
  139. Script2.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  140. Script2.Position = UDim2.new(-0.0152671756, 0, 0.926751614, 0)
  141. Script2.Size = UDim2.new(0, 253, 0, 27)
  142. Script2.Font = Enum.Font.SourceSans
  143. Script2.Text = "Scripts Belong to V3rmillion"
  144. Script2.TextColor3 = Color3.new(1, 0, 0)
  145. Script2.TextSize = 14
  146.  
  147. GiveStats.Name = "Give Stats"
  148. GiveStats.Parent = Maingui
  149. GiveStats.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  150. GiveStats.Position = UDim2.new(0.244215935, 0, 0.367283911, 0)
  151. GiveStats.Size = UDim2.new(0, 171, 0, 50)
  152. GiveStats.Font = Enum.Font.SourceSans
  153. GiveStats.Text = "Give Stats"
  154. GiveStats.TextColor3 = Color3.new(1, 0, 0)
  155. GiveStats.TextSize = 14
  156. GiveStats.MouseButton1Down:connect(function()
  157. local Dragon = workspace.SpawnedDragons:FindFirstChild(tostring(game.Players.LocalPlayer.UserId))
  158. if(Dragon)then
  159. for Index, DragonObject in pairs(Dragon:GetChildren())do
  160. DragonObject.Values.Stats.Multipliers.Speed.Value = 3
  161. end
  162. end
  163. end)
  164.  
  165. Owner.Name = "Owner"
  166. Owner.Parent = Maingui
  167. Owner.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  168. Owner.Position = UDim2.new(-0.00771208247, 0, 0.907407403, 0)
  169. Owner.Size = UDim2.new(0, 379, 0, 27)
  170. Owner.Font = Enum.Font.SourceSans
  171. Owner.Text = "Make By ClarkShadow"
  172. Owner.TextColor3 = Color3.new(1, 0, 0)
  173. Owner.TextSize = 14
  174.  
  175. Closegui.Name = "Closegui"
  176. Closegui.Parent = Maingui
  177. Closegui.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  178. Closegui.Position = UDim2.new(0.940873981, 0, -0.0246913582, 0)
  179. Closegui.Size = UDim2.new(0, 30, 0, 33)
  180. Closegui.Style = Enum.FrameStyle.DropShadow
  181. Closegui.Active = true
  182. Closegui.Draggable = false
  183.  
  184. Close.Name = "Close"
  185. Close.Parent = Closegui
  186. Close.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  187. Close.Position = UDim2.new(-0.0333333015, 0, -0.0673401356, 0)
  188. Close.Size = UDim2.new(0, 14, 0, 22)
  189. Close.Font = Enum.Font.SourceSans
  190. Close.Text = "X"
  191. Close.TextColor3 = Color3.new(1, 0, 0)
  192. Close.TextSize = 14
  193. Close.MouseButton1Down:connect(function()
  194. Maingui.Visible = false
  195. Teleport.Visible = false
  196. Opengui.Visible = true
  197. end)
  198.  
  199. OpenOther.Name = "OpenOther"
  200. OpenOther.Parent = Maingui
  201. OpenOther.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  202. OpenOther.Position = UDim2.new(0.241645247, 0, 0.589506149, 0)
  203. OpenOther.Size = UDim2.new(0, 171, 0, 50)
  204. OpenOther.Font = Enum.Font.SourceSans
  205. OpenOther.Text = "Open Other Gui"
  206. OpenOther.TextColor3 = Color3.new(1, 0, 0)
  207. OpenOther.TextSize = 14
  208. OpenOther.MouseButton1Down:connect(function()
  209. -- Explorer:
  210.  
  211. TextProperties = {"ClassName", "Name", "Value", "Text", "Reflectance", "Transparency", "Heat", "TeamName", "WalkSpeed", "Health", "MaxHealth", "Size", "Position", "AccountAge", "RobloxLocked", "TeamColor", "userId", "Brightness", "Ambient", "TimeOfDay", "FieldOfView", "CameraType", "LinkedSource"}
  212. BoolProperties = {"Anchored", "CanCollide", "Disabled", "Jump", "Sit", "Visible", "Enabled", "Locked", "FilteringEnabled", "StreamingEnabled", "GlobalShadows"}
  213. BrickColorProperties = {"BrickColor", "Color", "TeamColor", "Texture", "Value"}
  214. s = Instance.new("ScreenGui", game.CoreGui)
  215. pgr = Instance.new("TextButton")
  216. pgr.Parent = s
  217. pgr.Size = UDim2.new(0,100,0,40)
  218. pgr.Position = UDim2.new(0,30,0,440)
  219. pgr.Text="Explorer"
  220. pgr.BackgroundTransparency = 0.3
  221. pgr.TextColor = BrickColor.new("White")
  222. pgr.BackgroundColor = BrickColor.new("Really Black")
  223. pgr.BorderColor = BrickColor.new("Black")
  224. pgr.Font = "ArialBold"
  225. pgr.FontSize = "Size14"
  226. pgr.TextStrokeColor3 = Color3.new(0/0,0/0,0/0)
  227. pgr.TextStrokeTransparency = 0.3
  228. pgr.BorderSizePixel = 1
  229. pgr.BorderColor = BrickColor.new("White")
  230.  
  231. if game.CoreGui:findFirstChild("Explorer") then
  232. game.CoreGui:findFirstChild("Explorer"):Remove()
  233. end
  234.  
  235. local Cloned
  236. local Deleted
  237. local DeleteParent
  238. local Player
  239. local Search
  240. local ScriptSearch
  241. local Gui
  242. local Cloned = nil
  243. local Deleted = nil
  244. local DeleteParent = nil
  245. local Current = 0
  246. local CurrentOption = 0
  247.  
  248. function Clear()
  249. if Gui then
  250. Gui:Remove()
  251. end
  252. Current = 0
  253. CurrentOption = 0
  254. end
  255.  
  256. function AddButton(N, Function, Color, Copy)
  257. if not N then
  258. error("RenderButton - No Name Specified")
  259. end
  260. if not Function then
  261. error("RenderButton - No Function Specified")
  262. end
  263. if not Color then
  264. Color = Color3.new(1, 1, 1)
  265. end
  266. if Copy == nil then
  267. Copy = true
  268. end
  269. P = Instance.new("TextButton")
  270. if Copy then
  271. P.Size = UDim2.new(0, 110, 0, 20)
  272. else
  273. P.Size = UDim2.new(0, 130, 0, 20)
  274. end
  275. P.Text = N.Name
  276. P.Name = N.Name
  277. P.Parent = Gui
  278. P.BackgroundColor3 = Color
  279. P.TextColor3 = Color3.new(0, 0, 0)
  280. P.BackgroundTransparency = 0.5
  281. P.Position = UDim2.new(0, ((math.modf(Current/30))*150)+300, 0, 50+(20*((Current%30)-1)))
  282. P.MouseButton1Click:connect(function()
  283. Function(P)
  284. end)
  285. D = Instance.new("TextButton")
  286. D.Size = UDim2.new(0, 20, 0, 20)
  287. D.Text = "X"
  288. D.Name = N.Name
  289. D.Parent = Gui
  290. D.BackgroundColor3 = Color3.new(1, 0, 0)
  291. D.TextColor3 = Color3.new(0, 0, 0)
  292. D.BackgroundTransparency = 0.5
  293. D.Position = UDim2.new(0, ((math.modf(Current/30))*150)+300+130, 0, 50+(20*((Current%30)-1)))
  294. D.MouseButton1Click:connect(function()
  295. Deleted = N
  296. DeleteParent = N.Parent
  297. N.Parent = nil
  298. Clear()
  299. Search(DeleteParent)
  300. end)
  301. if Copy then
  302. C = Instance.new("TextButton")
  303. C.Size = UDim2.new(0, 20, 0, 20)
  304. C.Text = "C"
  305. C.Name = N.Name
  306. C.Parent = Gui
  307. C.BackgroundColor3 = Color3.new(0, 1, 0.5)
  308. C.TextColor3 = Color3.new(0, 0, 0)
  309. C.BackgroundTransparency = 0.5
  310. C.Position = UDim2.new(0, ((math.modf(Current/30))*150)+300+110, 0, 50+(20*((Current%30)-1)))
  311. C.MouseButton1Click:connect(function()
  312. Cloned = N
  313. Clear()
  314. Search(N.Parent)
  315. end)
  316. end
  317. Current = Current + 1
  318. return P
  319. end
  320.  
  321. function AddOption(N, Function, Color, Text)
  322. if not N then
  323. error("RenderButton - No Name Specified")
  324. end
  325. if not Color then
  326. Color = Color3.new(1, 1, 1)
  327. end
  328. if Text == nil then
  329. Text = false
  330. end
  331. if Text then
  332. P = Instance.new("TextBox")
  333. else
  334. P = Instance.new("TextButton")
  335. end
  336. P.Text = N
  337. P.Name = N
  338. P.Parent = Gui
  339. P.BackgroundColor3 = Color
  340. P.TextColor3 = Color3.new(0, 0, 0)
  341. P.BackgroundTransparency = 0.5
  342. P.Size = UDim2.new(0, 150, 0, 20)
  343. P.Position = UDim2.new(0, ((math.modf(CurrentOption/30))*150)+150, 0, 50+(20*((CurrentOption%30)-1)))
  344. if not Text and Function then
  345. P.MouseButton1Click:connect(function() Function(P) end)
  346. end
  347. CurrentOption = CurrentOption + 1
  348. return P
  349. end
  350.  
  351. function AddTextOption(Obj, Prop)
  352. local Ob = Obj
  353. local Pro = Prop
  354. if type(Ob[Pro]) == "number" or type(Ob[Pro]) == "string" then
  355. CurrentOption = CurrentOption + 1
  356. local T = AddOption(Ob[Pro], nil, Color3.new(0.1, 0.4, 0.1), true)
  357. CurrentOption = CurrentOption - 2
  358. local O = AddOption("Change "..Pro..":", function() Ob[Pro] = T.Text end, Color3.new(0.1, 0.8, 0.1), false)
  359. CurrentOption = CurrentOption + 1
  360. end
  361. end
  362.  
  363. function AddBrickColorOption(Obj, Prop)
  364. local Ob = Obj
  365. local Pro = Prop
  366. if BrickColor.new(tostring(Ob[Pro])) == Ob[Pro] then
  367. CurrentOption = CurrentOption + 1
  368. local T = AddOption(tostring(Ob[Pro]), nil, Color3.new(0.1, 0.4, 0.1), true)
  369. CurrentOption = CurrentOption - 2
  370. local O = AddOption("Change "..Pro..":", function() Ob[Pro] = BrickColor.new(T.Text) end, Color3.new(0.1, 0.8, 0.1), false)
  371. CurrentOption = CurrentOption + 1
  372. end
  373. end
  374.  
  375. function AddBoolOption(Obj, Prop)
  376. local Ob = Obj
  377. local Pro = Prop
  378. if type(Ob[Pro]) == "boolean" then
  379. local O = AddOption(Pro..": "..tostring(Ob[Pro]), nil, Color3.new(0.1, 0.8, 0.1), false)
  380. O.MouseButton1Click:connect(function()
  381. if Ob[Pro] then
  382. Ob[Pro] = false
  383. O.Text = Pro..": false"
  384. else
  385. Ob[Pro] = true
  386. O.Text = Pro..": true"
  387. end
  388. end)
  389. end
  390. end
  391.  
  392. function TestProperty(Obj, Property)
  393. Success = pcall(function()
  394. if Obj[Property] then
  395. return
  396. end
  397. end)
  398. return Success
  399. end
  400.  
  401. function LoadOptions(Object)
  402. for Num, Prop in pairs(TextProperties) do
  403. if TestProperty(Object, Prop) then
  404. AddTextOption(Object, Prop)
  405. end
  406. end
  407. for Num, Prop in pairs(BoolProperties) do
  408. if TestProperty(Object, Prop) then
  409. AddBoolOption(Object, Prop)
  410. end
  411. end
  412. for Num, Prop in pairs(BrickColorProperties) do
  413. if TestProperty(Object, Prop) then
  414. AddBrickColorOption(Object, Prop)
  415. end
  416. end
  417. end
  418.  
  419. function Search(Object)
  420. Gui = Instance.new("ScreenGui")
  421. Gui.Parent = game.CoreGui
  422. Gui.Name = "Explorer"
  423. if Object ~= game then
  424. AddOption("Back", function()
  425. Clear();
  426. Search(Object.Parent)
  427. end, Color3.new(0.5, 1, 1), false)
  428. end
  429. AddOption("Reload", function() Clear(); Search(Object); end, Color3.new(0.2, 1, 0.2), false)
  430. if Cloned then
  431. AddOption("Paste", function() Cloned:Clone().Parent = Object; Clear(); Search(Object); end, Color3.new(0.5, 1, 1), false)
  432. end
  433. if Deleted then
  434. AddOption("Undo", function() Deleted.Parent = DeleteParent; Deleted = nil; DeletedParent = nil; Clear(); Search(Object); end, Color3.new(1, 0.6, 0.1), false)
  435. end
  436. if Object:IsA("Player") then
  437. AddOption("Goto Character", function() Clear(); if Object.Character then Search(Object.Character); end end, Color3.new(1, 1, 1), false)
  438. end
  439. if Object:IsA("LocalScript") then
  440. AddOption("EditScript", function() Clear(); ScriptSearch(Object); end, Color3.new(1, 1, 1), false)
  441. end
  442. if Object:IsA("Terrain") then
  443. AddOption("Clear", function() Object:Clear(); end, Color3.new(1, 1, 1), false)
  444. end
  445. LoadOptions(Object)
  446. AddOption("Close", Clear, Color3.new(1, 0.2, 0), false)
  447. if not Object:IsA("Workspace") or not Object:IsA("Player") then
  448. for Num, Obj in pairs(Object:GetChildren()) do
  449. --if not Obj:IsA("BasePart") or not Object.Parent == game.Workspace then
  450. if true then
  451. if Obj:IsA("LocalScript") then
  452. AddButton(Obj, function() Clear(); Search(Obj); end, Color3.new(1, 0, 0), true)
  453. elseif Obj:IsA("Script") or Obj:IsA("StarterScript") or Obj:IsA("CoreScript") then
  454. AddButton(Obj, function() Clear(); Search(Obj); end, Color3.new(0.5, 0.5, 0.8), true)
  455. elseif Obj.Parent == game then
  456. AddButton(Obj, function() Clear(); Search(Obj); end, Color3.new(1, 1, 1), false)
  457. else
  458. AddButton(Obj, function() Clear(); Search(Obj); end, Color3.new(1, 1, 1), true)
  459. end
  460. end
  461. end
  462. end
  463. function MoveUp(Place, Amount)
  464. for i,v in pairs(Place:GetChildren()) do
  465. if v:IsA("TextLabel") or v:IsA("TextBox") then
  466. v.Position = v.Position + UDim2.new(0,0,0,-Amount)
  467. end
  468. end
  469. end
  470. function MoveDown(Place, Amount)
  471. for i,v in pairs(Place:GetChildren()) do
  472. if v:IsA("TextLabel") or v:IsA("TextBox") then
  473. v.Position = v.Position + UDim2.new(0,0,0,Amount)
  474. end
  475. end
  476. end
  477. i=0
  478. function ScriptSearch(S)
  479. Script2 = S
  480. Script = Script2.Source
  481. Table = {}
  482. Enabled = true
  483. Gui = Instance.new("ScreenGui")
  484. Gui.Parent = game.CoreGui
  485. Gui.Name = "Explorer"
  486. while Enabled do
  487. Start, End = string.find(Script, '\n')
  488. print(Start, End)
  489. if Start and End then
  490. table.insert(Table, string.sub(Script, 1, End))
  491. New = string.sub(Script, End+1, string.len(Script))
  492. Script = New
  493. else
  494. Enabled = false
  495. table.insert(Table, string.sub(Script, 1, End))
  496. print("Finished")
  497. end
  498. end
  499. P = Instance.new("TextLabel")
  500. P.Size = UDim2.new(0, 500, 0, 20)
  501. P.Text = Script2.Name
  502. P.Name = "Script Line"
  503. P.Parent = Gui
  504. P.BackgroundColor3 = Color3.new(1, 1, 1)
  505. P.TextColor3 = Color3.new(0, 0, 0)
  506. P.BackgroundTransparency = 0.5
  507. P.Position = UDim2.new(0.5, -250, 0, 150+(20*(i-1)))
  508. P.TextXAlignment = "Left"
  509. i=i+1
  510. New = {}
  511. for I,Val in pairs(Table) do
  512. print(Val)
  513. P = Instance.new("TextBox")
  514. P.ClearTextOnFocus = false
  515. P.Size = UDim2.new(0, 500, 0, 20)
  516. P.Text = Val
  517. P.Name = "Script Line"
  518. P.Parent = Gui
  519. P.BackgroundColor3 = Color3.new(1, 1, 1)
  520. P.TextColor3 = Color3.new(0, 0, 0)
  521. P.BackgroundTransparency = 0.5
  522. P.Position = UDim2.new(0.5, -250, 0, 150+(20*(i-1)))
  523. P.TextXAlignment = "Left"
  524. table.insert(New, P)
  525. i=i+1
  526. end
  527. i=1
  528. P = Instance.new("TextButton")
  529. P.Size = UDim2.new(0, 20, 0, 20)
  530. P.Text = "^"
  531. P.Name = "Scroll"
  532. P.Parent = Gui
  533. P.BackgroundColor3 = Color3.new(1, 1, 1)
  534. P.TextColor3 = Color3.new(0, 0, 0)
  535. P.BackgroundTransparency = 0.5
  536. P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
  537. P.MouseButton1Click:connect(function()
  538. MoveUp(Gui, -20)
  539. end)
  540. i=i+1
  541. P = Instance.new("TextButton")
  542. P.Size = UDim2.new(0, 20, 0, 20)
  543. P.Text = "v"
  544. P.Name = "Scroll"
  545. P.Parent = Gui
  546. P.BackgroundColor3 = Color3.new(1, 1, 1)
  547. P.TextColor3 = Color3.new(0, 0, 0)
  548. P.BackgroundTransparency = 0.5
  549. P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
  550. P.MouseButton1Click:connect(function()
  551. MoveDown(Gui, -20)
  552. end)
  553. i=i+1
  554. P = Instance.new("TextButton")
  555. P.Size = UDim2.new(0, 20, 0, 20)
  556. P.Text = "^^"
  557. P.Name = "Scroll"
  558. P.Parent = Gui
  559. P.BackgroundColor3 = Color3.new(1, 1, 1)
  560. P.TextColor3 = Color3.new(0, 0, 0)
  561. P.BackgroundTransparency = 0.5
  562. P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
  563. P.MouseButton1Click:connect(function()
  564. MoveUp(Gui, -200)
  565. end)
  566. i=i+1
  567. P = Instance.new("TextButton")
  568. P.Size = UDim2.new(0, 20, 0, 20)
  569. P.Text = "vv"
  570. P.Name = "Scroll"
  571. P.Parent = Gui
  572. P.BackgroundColor3 = Color3.new(1, 1, 1)
  573. P.TextColor3 = Color3.new(0, 0, 0)
  574. P.BackgroundTransparency = 0.5
  575. P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
  576. P.MouseButton1Click:connect(function()
  577. MoveDown(Gui, -200)
  578. end)
  579. i=i+1
  580. P = Instance.new("TextButton")
  581. P.Size = UDim2.new(0, 20, 0, 20)
  582. P.Text = "S"
  583. P.Name = "Save"
  584. P.Parent = Gui
  585. P.BackgroundColor3 = Color3.new(0, 1, 0)
  586. P.TextColor3 = Color3.new(0, 0, 0)
  587. P.BackgroundTransparency = 0.5
  588. P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
  589. P.MouseButton1Click:connect(function()
  590. StringS = ""
  591. for Num, Obj in pairs(New) do
  592. StringS = StringS..Obj.Text..'\n'
  593. end
  594. S.Source = StringS
  595. S.Disabled = true
  596. S.Disabled = false
  597. end)
  598. i=i+1
  599. P = Instance.new("TextButton")
  600. P.Size = UDim2.new(0, 20, 0, 20)
  601. P.Text = "x"
  602. P.Name = "Back"
  603. P.Parent = Gui
  604. P.BackgroundColor3 = Color3.new(1, 0.2, 0)
  605. P.TextColor3 = Color3.new(0, 0, 0)
  606. P.BackgroundTransparency = 0.5
  607. P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
  608. P.MouseButton1Click:connect(function()
  609. Clear()
  610. i=0
  611. Search(S)
  612. end)
  613. i=i+1
  614. end
  615. end
  616.  
  617. pgr.MouseButton1Click:connect(function()
  618. Clear()
  619. Search(game)
  620. end)
  621. end)
  622.  
  623. Opengui.Name = "Opengui"
  624. Opengui.Parent = ScreenGui
  625. Opengui.BackgroundColor3 = Color3.new(1, 1, 1)
  626. Opengui.Position = UDim2.new(-0.0108695645, 0, 0.430278897, 0)
  627. Opengui.Size = UDim2.new(0, 95, 0, 43)
  628. Opengui.Style = Enum.FrameStyle.DropShadow
  629. Opengui.Active = true
  630. Opengui.Draggable = true
  631.  
  632. Open.Name = "Open"
  633. Open.Parent = Opengui
  634. Open.BackgroundColor3 = Color3.new(0, 1, 0.498039)
  635. Open.Position = UDim2.new(-0.00167464092, 0, 0.0854993165, 0)
  636. Open.Size = UDim2.new(0, 78, 0, 20)
  637. Open.Font = Enum.Font.SourceSans
  638. Open.Text = "Open"
  639. Open.TextColor3 = Color3.new(1, 0, 0)
  640. Open.TextSize = 14
  641. Open.MouseButton1Down:connect(function()
  642. Opengui.Visible = false
  643. Maingui.Visible = true
  644. end)
  645. -- Scripts:
Advertisement
Add Comment
Please, Sign In to add comment