xProScripter

whitelister

Feb 26th, 2021 (edited)
776
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 10.23 KB | None | 0 0
  1. -- Gui to Lua
  2. -- Version: 3.2
  3.  
  4. -- Instances:
  5.  
  6. local whitelist = Instance.new("ScreenGui")
  7. local Main = Instance.new("Frame")
  8. local title = Instance.new("TextLabel")
  9. local MainCorner = Instance.new("UICorner")
  10. local check = Instance.new("TextButton")
  11. local MainCorner_2 = Instance.new("UICorner")
  12. local keytext = Instance.new("TextBox")
  13. local MainCorner_3 = Instance.new("UICorner")
  14. local close = Instance.new("TextButton")
  15. local MainCorner_4 = Instance.new("UICorner")
  16. local closer = Instance.new("ScrollingFrame")
  17. local closertxt = Instance.new("TextLabel")
  18. local MainCorner_5 = Instance.new("UICorner")
  19. local keyer = Instance.new("ScrollingFrame")
  20. local closertxt_2 = Instance.new("TextLabel")
  21. local MainCorner_6 = Instance.new("UICorner")
  22. local ser = Instance.new("ScrollingFrame")
  23. local closertxt_3 = Instance.new("TextLabel")
  24. local MainCorner_7 = Instance.new("UICorner")
  25. local MainCorner_8 = Instance.new("UICorner")
  26.  
  27. --Properties:
  28.  
  29. whitelist.Name = "whitelist"
  30. whitelist.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
  31. whitelist.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  32. whitelist.ResetOnSpawn = false
  33.  
  34. Main.Name = "Main"
  35. Main.Parent = whitelist
  36. Main.BackgroundColor3 = Color3.fromRGB(27, 27, 27)
  37. Main.Position = UDim2.new(0.435533613, 0, 0.331412107, 0)
  38. Main.Size = UDim2.new(0, 209, 0, 121)
  39.  
  40. title.Name = "title"
  41. title.Parent = Main
  42. title.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
  43. title.Position = UDim2.new(0.0287081338, 0, 0.0423647054, 0)
  44. title.Size = UDim2.new(0, 157, 0, 34)
  45. title.Font = Enum.Font.SourceSans
  46. title.Text = "Whitelist Checker"
  47. title.TextColor3 = Color3.fromRGB(255, 255, 255)
  48. title.TextSize = 18.000
  49.  
  50. MainCorner.CornerRadius = UDim.new(0.100000001, 0)
  51. MainCorner.Name = "MainCorner"
  52. MainCorner.Parent = title
  53.  
  54. check.Name = "check"
  55. check.Parent = Main
  56. check.BackgroundColor3 = Color3.fromRGB(60, 60, 60)
  57. check.Position = UDim2.new(0.0287081338, 0, 0.742452323, 0)
  58. check.Size = UDim2.new(0, 197, 0, 25)
  59. check.Font = Enum.Font.SourceSans
  60. check.Text = "Submit"
  61. check.TextColor3 = Color3.fromRGB(255, 255, 255)
  62. check.TextSize = 14.000
  63.  
  64. MainCorner_2.CornerRadius = UDim.new(0.150000006, 0)
  65. MainCorner_2.Name = "MainCorner"
  66. MainCorner_2.Parent = check
  67.  
  68. keytext.Name = "keytext"
  69. keytext.Parent = Main
  70. keytext.BackgroundColor3 = Color3.fromRGB(60, 60, 60)
  71. keytext.Position = UDim2.new(0.0287081338, 0, 0.376117289, 0)
  72. keytext.Size = UDim2.new(0, 197, 0, 38)
  73. keytext.Font = Enum.Font.SourceSans
  74. keytext.PlaceholderText = "Key here."
  75. keytext.Text = ""
  76. keytext.TextColor3 = Color3.fromRGB(255, 255, 255)
  77. keytext.TextSize = 14.000
  78.  
  79. MainCorner_3.CornerRadius = UDim.new(0.100000001, 0)
  80. MainCorner_3.Name = "MainCorner"
  81. MainCorner_3.Parent = keytext
  82.  
  83. close.Name = "close"
  84. close.Parent = Main
  85. close.BackgroundColor3 = Color3.fromRGB(255, 26, 37)
  86. close.Position = UDim2.new(0.808612466, 0, 0.0423647054, 0)
  87. close.Size = UDim2.new(0, 34, 0, 33)
  88. close.Font = Enum.Font.GothamBold
  89. close.Text = ""
  90. close.TextColor3 = Color3.fromRGB(255, 255, 255)
  91. close.TextSize = 24.000
  92.  
  93. MainCorner_4.CornerRadius = UDim.new(0.150000006, 0)
  94. MainCorner_4.Name = "MainCorner"
  95. MainCorner_4.Parent = close
  96.  
  97. closer.Name = "closer"
  98. closer.Parent = Main
  99. closer.Active = true
  100. closer.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  101. closer.BackgroundTransparency = 1.000
  102. closer.Position = UDim2.new(1.0287081, 0, 0, 0)
  103. closer.Size = UDim2.new(0.593301415, 0, 0.315091968, 0)
  104. closer.CanvasSize = UDim2.new(0, 0, 0, 0)
  105. closer.ScrollBarThickness = 0
  106.  
  107. closertxt.Name = "closertxt"
  108. closertxt.Parent = closer
  109. closertxt.BackgroundColor3 = Color3.fromRGB(27, 27, 27)
  110. closertxt.Position = UDim2.new(0, 1, 0, 0)
  111. closertxt.Size = UDim2.new(0, 120, 0, 38)
  112. closertxt.Font = Enum.Font.SourceSans
  113. closertxt.Text = "Click to close the GUI."
  114. closertxt.TextColor3 = Color3.fromRGB(255, 255, 255)
  115. closertxt.TextSize = 14.000
  116.  
  117. MainCorner_5.CornerRadius = UDim.new(0.150000006, 0)
  118. MainCorner_5.Name = "MainCorner"
  119. MainCorner_5.Parent = closertxt
  120.  
  121. keyer.Name = "keyer"
  122. keyer.Parent = Main
  123. keyer.Active = true
  124. keyer.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  125. keyer.BackgroundTransparency = 1.000
  126. keyer.Position = UDim2.new(1.0287081, 0, 0.376117289, 0)
  127. keyer.Size = UDim2.new(0.593301415, 0, 0.314049602, 0)
  128. keyer.CanvasSize = UDim2.new(0, 0, 0, 0)
  129. keyer.ScrollBarThickness = 0
  130.  
  131. closertxt_2.Name = "closertxt"
  132. closertxt_2.Parent = keyer
  133. closertxt_2.BackgroundColor3 = Color3.fromRGB(27, 27, 27)
  134. closertxt_2.Position = UDim2.new(0, 1, 0, 0)
  135. closertxt_2.Size = UDim2.new(0, 120, 0, 38)
  136. closertxt_2.Font = Enum.Font.SourceSans
  137. closertxt_2.Text = "Insert key here."
  138. closertxt_2.TextColor3 = Color3.fromRGB(255, 255, 255)
  139. closertxt_2.TextSize = 14.000
  140.  
  141. MainCorner_6.CornerRadius = UDim.new(0.150000006, 0)
  142. MainCorner_6.Name = "MainCorner"
  143. MainCorner_6.Parent = closertxt_2
  144.  
  145. ser.Name = "ser"
  146. ser.Parent = Main
  147. ser.Active = true
  148. ser.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  149. ser.BackgroundTransparency = 1.000
  150. ser.Position = UDim2.new(1.0287081, 0, 0.742452323, 0)
  151. ser.Size = UDim2.new(0.593301415, 0, 0.206611574, 0)
  152. ser.CanvasSize = UDim2.new(0, 0, 0, 0)
  153. ser.ScrollBarThickness = 0
  154.  
  155. closertxt_3.Name = "closertxt"
  156. closertxt_3.Parent = ser
  157. closertxt_3.BackgroundColor3 = Color3.fromRGB(27, 27, 27)
  158. closertxt_3.Position = UDim2.new(0, 1, 0, 0)
  159. closertxt_3.Size = UDim2.new(0, 120, 0, 25)
  160. closertxt_3.Font = Enum.Font.SourceSans
  161. closertxt_3.Text = "Submit your key."
  162. closertxt_3.TextColor3 = Color3.fromRGB(255, 255, 255)
  163. closertxt_3.TextSize = 14.000
  164.  
  165. MainCorner_7.CornerRadius = UDim.new(0.150000006, 0)
  166. MainCorner_7.Name = "MainCorner"
  167. MainCorner_7.Parent = closertxt_3
  168.  
  169. MainCorner_8.CornerRadius = UDim.new(0.0399999991, 0)
  170. MainCorner_8.Name = "MainCorner"
  171. MainCorner_8.Parent = Main
  172.  
  173. -- Scripts:
  174.  
  175. local function ERZCU_fake_script() -- check.handler
  176.     local script = Instance.new('LocalScript', check)
  177.  
  178.     local but = script.Parent
  179.     local key = script.Parent.Parent.keytext
  180.     local main = script.Parent.Parent
  181.     local ser = script.Parent.Parent.ser
  182.    
  183.     local on = UDim2.new(0.593, 0, 0.207, 0)
  184.     local off = UDim2.new(0, 0, 0.207, 0)
  185.    
  186.     ser.Size = off
  187.    
  188.     but.MouseEnter:Connect(function()
  189.         ser:TweenSize(on, "InOut", "Sine", 0.14, true)
  190.     end)
  191.     but.MouseLeave:Connect(function()
  192.         ser:TweenSize(off, "InOut", "Sine", 0.14, true)
  193.     end)
  194.    
  195.     but.MouseButton1Click:Connect(function()
  196.         local check = "https://keycheck1.000webhostapp.com/check.php?key=" .. key.Text
  197.         if game:HttpGet(check) == "Whitelisted" then
  198.             but.Text = "Whitelisted."
  199.             wait(2)
  200.             loadstring(game:HttpGet("https://keycheck1.000webhostapp.com/script.lua"))()
  201.             main:Destroy()
  202.         else
  203.             but.Text = "Not whitelisted."
  204.             wait(0.3)
  205.             game.Players.LocalPlayer:Kick("Invalid key.")
  206.         end
  207.     end)
  208. end
  209. coroutine.wrap(ERZCU_fake_script)()
  210. local function KINARQX_fake_script() -- keytext.sizer
  211.     local script = Instance.new('LocalScript', keytext)
  212.  
  213.     local on = UDim2.new(0.593, 0, 0.315, 0)
  214.     local off = UDim2.new(0, 0, 0.315, 0)
  215.     local keyer = script.Parent.Parent.keyer
  216.    
  217.     keyer.Size = off
  218.    
  219.     script.Parent.MouseEnter:Connect(function()
  220.         keyer:TweenSize(on, "InOut", "Sine", 0.14, true)
  221.     end)
  222.     script.Parent.MouseLeave:Connect(function()
  223.         keyer:TweenSize(off, "InOut", "Sine", 0.14, true)
  224.     end)
  225. end
  226. coroutine.wrap(KINARQX_fake_script)()
  227. local function FRZNG_fake_script() -- Main.smoothdrag
  228.     local script = Instance.new('LocalScript', Main)
  229.  
  230.     local UIS = game:GetService("UserInputService")
  231.     function dragify(Frame)
  232.         dragToggle = nil
  233.         dragSpeed = 0.25
  234.         dragInput = nil
  235.         dragStart = nil
  236.         dragPos = nil
  237.         function updateInput(input)
  238.             Delta = input.Position - dragStart
  239.             Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + Delta.X, startPos.Y.Scale, startPos.Y.Offset + Delta.Y)
  240.             game:GetService("TweenService"):Create(Frame, TweenInfo.new(0.18), {Position = Position}):Play()
  241.         end
  242.         Frame.InputBegan:Connect(function(input)
  243.             if (input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch) and UIS:GetFocusedTextBox() == nil then
  244.                 dragToggle = true
  245.                 dragStart = input.Position
  246.                 startPos = Frame.Position
  247.                 input.Changed:Connect(function()
  248.                     if input.UserInputState == Enum.UserInputState.End then
  249.                         dragToggle = false
  250.                     end
  251.                 end)
  252.             end
  253.         end)
  254.         Frame.InputChanged:Connect(function(input)
  255.             if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
  256.                 dragInput = input
  257.             end
  258.         end)
  259.         game:GetService("UserInputService").InputChanged:Connect(function(input)
  260.             if input == dragInput and dragToggle then
  261.                 updateInput(input)
  262.             end
  263.         end)
  264.     end
  265.    
  266.     dragify(script.Parent)
  267. end
  268. coroutine.wrap(FRZNG_fake_script)()
  269. local function UVAC_fake_script() -- close.handler
  270.     local script = Instance.new('LocalScript', close)
  271.  
  272.     local but = script.Parent
  273.     local closer = script.Parent.Parent.closer
  274.     local gui = script.Parent.Parent.Parent
  275.    
  276.     local on = UDim2.new(0.593, 0, 0.315, 0)
  277.     local off = UDim2.new(0, 0, 0.315, 0)
  278.    
  279.     closer.Size = off
  280.    
  281.     but.MouseEnter:Connect(function()
  282.         closer:TweenSize(on, "InOut", "Sine", 0.14, true)
  283.     end)
  284.     but.MouseLeave:Connect(function()
  285.         closer:TweenSize(off, "InOut", "Sine", 0.14, true)
  286.     end)
  287.    
  288.    
  289.    
  290.     but.MouseButton1Click:Connect(function()
  291.         gui:Destroy()
  292.     end)
  293. end
  294. coroutine.wrap(UVAC_fake_script)()
  295. local function JFGOKOU_fake_script() -- closertxt.LocalScript
  296.     local script = Instance.new('LocalScript', closertxt)
  297.  
  298.     local corner = script.Parent.MainCorner
  299.    
  300.     corner.CornerRadius = UDim2.new(0.13, 0)
  301. end
  302. coroutine.wrap(JFGOKOU_fake_script)()
  303. local function VKHI_fake_script() -- closertxt_2.LocalScript
  304.     local script = Instance.new('LocalScript', closertxt_2)
  305.  
  306.     local corner = script.Parent.MainCorner
  307.    
  308.     corner.CornerRadius = UDim2.new(0.13, 0)
  309. end
  310. coroutine.wrap(VKHI_fake_script)()
  311. local function HBGME_fake_script() -- closertxt_3.LocalScript
  312.     local script = Instance.new('LocalScript', closertxt_3)
  313.  
  314.     local corner = script.Parent.MainCorner
  315.    
  316.     corner.CornerRadius = UDim2.new(0.13, 0)
  317. end
  318. coroutine.wrap(HBGME_fake_script)()
  319.  
Add Comment
Please, Sign In to add comment