Advertisement
NiceBBMBThai

หา module

Dec 28th, 2021
41
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.85 KB | None | 0 0
  1. -- Gui to Lua
  2. -- Version: 3.2
  3.  
  4. -- Instances:
  5.  
  6. local ScreenGui = Instance.new("ScreenGui")
  7. local MainFrame = Instance.new("Frame")
  8. local Frame = Instance.new("Frame")
  9. local TextFrame = Instance.new("ScrollingFrame")
  10. local ScriptBox = Instance.new("TextBox")
  11. local ScriptBox_2 = Instance.new("TextBox")
  12. local Open = Instance.new("TextButton")
  13. local Update = Instance.new("TextButton")
  14.  
  15. --Properties:
  16.  
  17. ScreenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
  18. ScreenGui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  19.  
  20. MainFrame.Name = "MainFrame"
  21. MainFrame.Parent = ScreenGui
  22. MainFrame.BackgroundColor3 = Color3.fromRGB(75, 75, 75)
  23. MainFrame.BorderSizePixel = 0
  24. MainFrame.Position = UDim2.new(0.0751824826, 0, 0.220663279, 0)
  25. MainFrame.Size = UDim2.new(0, 750, 0, 500)
  26.  
  27. Frame.Parent = MainFrame
  28. Frame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  29. Frame.BorderSizePixel = 0
  30. Frame.Position = UDim2.new(0, 0, 0.159999996, 0)
  31. Frame.Size = UDim2.new(1, 0, 0.839999974, 0)
  32.  
  33. TextFrame.Name = "TextFrame"
  34. TextFrame.Parent = Frame
  35. TextFrame.Active = true
  36. TextFrame.BackgroundColor3 = Color3.fromRGB(100, 100, 100)
  37. TextFrame.BorderSizePixel = 0
  38. TextFrame.Size = UDim2.new(1, 0, 1, 0)
  39. TextFrame.CanvasSize = UDim2.new(0, 0, 10, 0)
  40. TextFrame.ScrollBarThickness = 10
  41.  
  42. ScriptBox.Name = "ScriptBox"
  43. ScriptBox.Parent = TextFrame
  44. ScriptBox.BackgroundColor3 = Color3.fromRGB(100, 100, 100)
  45. ScriptBox.BorderSizePixel = 0
  46. ScriptBox.Size = UDim2.new(1, 0, 1, 0)
  47. ScriptBox.ClearTextOnFocus = false
  48. ScriptBox.Font = Enum.Font.SourceSans
  49. ScriptBox.PlaceholderColor3 = Color3.fromRGB(178, 178, 178)
  50. ScriptBox.Text = ""
  51. ScriptBox.TextColor3 = Color3.fromRGB(255, 255, 255)
  52. ScriptBox.TextSize = 20.000
  53. ScriptBox.TextXAlignment = Enum.TextXAlignment.Left
  54. ScriptBox.TextYAlignment = Enum.TextYAlignment.Top
  55.  
  56. ScriptBox_2.Name = "ScriptBox"
  57. ScriptBox_2.Parent = MainFrame
  58. ScriptBox_2.BackgroundColor3 = Color3.fromRGB(100, 100, 100)
  59. ScriptBox_2.BorderSizePixel = 0
  60. ScriptBox_2.Position = UDim2.new(0, 0, 0.0560000017, 0)
  61. ScriptBox_2.Size = UDim2.new(0.843999982, 0, 0.0480000004, 0)
  62. ScriptBox_2.Font = Enum.Font.SourceSans
  63. ScriptBox_2.PlaceholderColor3 = Color3.fromRGB(255, 255, 255)
  64. ScriptBox_2.PlaceholderText = "Module script path here"
  65. ScriptBox_2.Text = ""
  66. ScriptBox_2.TextColor3 = Color3.fromRGB(255, 255, 255)
  67. ScriptBox_2.TextSize = 20.000
  68. ScriptBox_2.TextXAlignment = Enum.TextXAlignment.Left
  69. ScriptBox_2.TextYAlignment = Enum.TextYAlignment.Top
  70.  
  71. Open.Name = "Open"
  72. Open.Parent = MainFrame
  73. Open.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
  74. Open.BorderSizePixel = 0
  75. Open.Position = UDim2.new(0.843999982, 0, 0.0560000017, 0)
  76. Open.Size = UDim2.new(0, 117, 0, 24)
  77. Open.Font = Enum.Font.SourceSans
  78. Open.Text = "Open"
  79. Open.TextColor3 = Color3.fromRGB(255, 255, 255)
  80. Open.TextScaled = true
  81. Open.TextSize = 14.000
  82. Open.TextWrapped = true
  83.  
  84. Update.Name = "Update"
  85. Update.Parent = MainFrame
  86. Update.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
  87. Update.BorderSizePixel = 0
  88. Update.Position = UDim2.new(0.421333343, 0, 0.104000002, 0)
  89. Update.Size = UDim2.new(0, 117, 0, 28)
  90. Update.Font = Enum.Font.SourceSans
  91. Update.Text = "Update"
  92. Update.TextColor3 = Color3.fromRGB(255, 255, 255)
  93. Update.TextScaled = true
  94. Update.TextSize = 14.000
  95. Update.TextWrapped = true
  96.  
  97. -- Scripts:
  98.  
  99. local function LJCVKNB_fake_script() -- Open.LocalScript
  100. local script = Instance.new('LocalScript', Open)
  101.  
  102. script.Parent.MouseButton1Click:Connect(function()
  103. local dump = "";
  104. loadstring("module = "..script.Parent.Parent.ScriptBox.Text)();
  105. for i,v in pairs(require(module)) do
  106. if type(v) == "function" or type(v) == "table" then wait() else
  107. dump = dump.."[\""..tostring(i) .. "\"] = "
  108. if type(v) == "string" then
  109. dump = dump.."\"".. tostring(v).."\"\n"
  110. else
  111. dump = dump..tostring(v).."\n"
  112. end
  113. end
  114. end
  115. script.Parent.Parent.Frame.TextFrame.ScriptBox.Text = dump
  116. end)
  117. end
  118. coroutine.wrap(LJCVKNB_fake_script)()
  119. local function ZUWSX_fake_script() -- Update.LocalScript
  120. local script = Instance.new('LocalScript', Update)
  121.  
  122. script.Parent.MouseButton1Click:Connect(function()
  123. local code = script.Parent.Parent.Frame.TextFrame.ScriptBox.Text
  124. loadstring("module = "..script.Parent.Parent.ScriptBox.Text)();
  125. for i,v in pairs(string.split(code,"\n")) do
  126. loadstring("require(module)"..tostring(v))();
  127. end
  128. end)
  129. end
  130. coroutine.wrap(ZUWSX_fake_script)()
  131. local function WNJFWSW_fake_script() -- MainFrame.Drag script
  132. local script = Instance.new('LocalScript', MainFrame)
  133.  
  134. --Credits go to whoever made this script.
  135.  
  136. local UIS = game:GetService("UserInputService")
  137. function drag (Frame)
  138. dragToggle = nil
  139. dragSpeed = 0.23
  140. dragInput = nil
  141. dragStart = nil
  142. dragPos = nil
  143. function updateInput(input)
  144. Delta = input.Position - dragStart
  145. Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + Delta.X, startPos.Y.Scale, startPos.Y.Offset + Delta.Y)
  146. game:GetService("TweenService"):Create(Frame, TweenInfo.new(0.25), {Position = Position}):Play()
  147. end
  148. Frame.InputBegan:Connect(function(input)
  149. if (input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch) and UIS:GetFocusedTextBox() == nil then
  150. dragToggle = true
  151. dragStart = input.Position
  152. startPos = Frame.Position
  153. input.Changed:Connect(function()
  154. if input.UserInputState == Enum.UserInputState.End then
  155. dragToggle = false
  156. end
  157. end)
  158. end
  159. end)
  160. Frame.InputChanged:Connect(function(input)
  161. if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
  162. dragInput = input
  163. end
  164. end)
  165. game:GetService("UserInputService").InputChanged:Connect(function(input)
  166. if input == dragInput and dragToggle then
  167. updateInput(input)
  168. end
  169. end)
  170. end
  171. drag(script.Parent)
  172.  
  173. end
  174. coroutine.wrap(WNJFWSW_fake_script)()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement