Advertisement
Hellotop2

Untitled

Jan 14th, 2019
114
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.14 KB | None | 0 0
  1. -- Objects
  2.  
  3. local Obfuscater = Instance.new("ScreenGui")
  4. local Background = Instance.new("Frame")
  5. local obthisscriptoutput = Instance.new("TextBox")
  6. local okhere = Instance.new("TextBox")
  7. local obbutton = Instance.new("TextButton")
  8. local cobutton = Instance.new("TextButton")
  9.  
  10. -- Properties
  11.  
  12. Obfuscater.Name = "Obfuscater"
  13. Obfuscater.Parent = game.CoreGui
  14.  
  15. Background.Name = "Background"
  16. Background.Parent = Obfuscater
  17. Background.BackgroundColor3 = Color3.new(0.282353, 0.282353, 0.282353)
  18. Background.BorderSizePixel = 0
  19. Background.Position = UDim2.new(0.26220277, 0, 0.17118226, 0)
  20. Background.Size = UDim2.new(0, 823, 0, 458)
  21.  
  22. obthisscriptoutput.Name = "obthisscriptoutput"
  23. obthisscriptoutput.Parent = Background
  24. obthisscriptoutput.BackgroundColor3 = Color3.new(1, 1, 1)
  25. obthisscriptoutput.BorderSizePixel = 0
  26. obthisscriptoutput.Size = UDim2.new(0, 357, 0, 458)
  27. obthisscriptoutput.Font = Enum.Font.SourceSansLight
  28. obthisscriptoutput.Text = "Script you want to be obfuscated."
  29. obthisscriptoutput.TextColor3 = Color3.new(0, 0, 0)
  30. obthisscriptoutput.TextSize = 14
  31. obthisscriptoutput.TextWrapped = true
  32. obthisscriptoutput.TextXAlignment = Enum.TextXAlignment.Left
  33. obthisscriptoutput.TextYAlignment = Enum.TextYAlignment.Top
  34.  
  35. okhere.Name = "okhere"
  36. okhere.Parent = Background
  37. okhere.BackgroundColor3 = Color3.new(1, 1, 1)
  38. okhere.BorderSizePixel = 0
  39. okhere.Position = UDim2.new(0.566221118, 0, 0, 0)
  40. okhere.Size = UDim2.new(0, 357, 0, 458)
  41. okhere.Font = Enum.Font.SourceSansLight
  42. okhere.Text = "This is your obfuscated script"
  43. okhere.TextColor3 = Color3.new(0, 0, 0)
  44. okhere.TextSize = 14
  45. okhere.TextWrapped = true
  46. okhere.TextXAlignment = Enum.TextXAlignment.Left
  47. okhere.TextYAlignment = Enum.TextYAlignment.Top
  48.  
  49. obbutton.Name = "obbutton"
  50. obbutton.Parent = Background
  51. obbutton.BackgroundColor3 = Color3.new(0.329412, 1, 0.372549)
  52. obbutton.BorderSizePixel = 0
  53. obbutton.Position = UDim2.new(0.433778852, 0, 0.246724904, 0)
  54. obbutton.Size = UDim2.new(0, 109, 0, 50)
  55. obbutton.Font = Enum.Font.SourceSansLight
  56. obbutton.Text = "Obfuscate"
  57. obbutton.TextColor3 = Color3.new(1, 1, 1)
  58. obbutton.TextScaled = true
  59. obbutton.TextSize = 14
  60. obbutton.TextWrapped = true
  61.  
  62. cobutton.Name = "cobutton"
  63. cobutton.Parent = Background
  64. cobutton.BackgroundColor3 = Color3.new(0.329412, 1, 0.372549)
  65. cobutton.BorderSizePixel = 0
  66. cobutton.Position = UDim2.new(0.433778852, 0, 0.489082992, 0)
  67. cobutton.Size = UDim2.new(0, 109, 0, 50)
  68. cobutton.Font = Enum.Font.SourceSansLight
  69. cobutton.Text = "Copy"
  70. cobutton.TextColor3 = Color3.new(1, 1, 1)
  71. cobutton.TextScaled = true
  72. cobutton.TextSize = 14
  73. cobutton.TextWrapped = true
  74. obbutton.MouseButton1Click:Connect(function()
  75.  
  76.  
  77. -- By Sikke
  78.  
  79. local Script = obthisscriptoutput.Text -- < Put script here
  80.  
  81. --
  82.  
  83. function Encode(Text)
  84. Text = tostring(Text)
  85. local Table = {}
  86. for i = 1, #Text do
  87. local T = Text:sub(i, i)
  88. table.insert(Table, T)
  89. end
  90. local T = {}
  91. local MyText = "'"
  92. for i, v in pairs(Table) do
  93. local Key = string.byte(v)
  94. MyText = MyText..math.floor(Key/128)
  95. Key = Key % 128
  96. MyText = MyText..math.floor(Key/64)
  97. Key = Key % 64
  98. MyText = MyText..math.floor(Key/32)
  99. Key = Key % 32
  100. MyText = MyText..math.floor(Key/16)
  101. Key = Key % 16
  102. MyText = MyText..math.floor(Key/8)
  103. Key = Key % 8
  104. MyText = MyText..math.floor(Key/4)
  105. Key = Key % 4
  106. MyText = MyText..math.floor(Key/2)
  107. Key = Key % 2
  108. MyText = MyText..math.floor(Key/1)
  109. Key = Key % 1
  110. MyText=MyText.."','"
  111. end
  112. MyText = MyText:sub(1, #MyText -1)
  113. if tonumber(MyText) then
  114. MyText = tonumber(MyText)
  115. end
  116. return MyText
  117. end
  118. -- ENCODE
  119. local Encoded = Encode(Script)
  120. okhere.Text = [[local BinaryEncrypted = ]].."table.concat({"..Encoded.."})"..[[ function decode(str) local function binary_to_string(bin) return string.char(tonumber(bin, 2));end;return (str:gsub("(".. ("[01]"):rep(8) .. ")", binary_to_string));end;local Binary = BinaryEncrypted _G.EncodedBinary = decode(Binary);loadstring(_G.EncodedBinary)()]]
  121. end)
  122.  
  123. cobutton.MouseButton1Click:Connect(function()
  124. syn.write_clipboard(obthisscriptoutput.Text)
  125. end)
  126. local UserInputService,gui,dragging,dragInput,dragStart,startPos = game:GetService("UserInputService"),Background
  127.  
  128. local function update(input)
  129. local delta = input.Position - dragStart
  130. wait(0.1)
  131. gui.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
  132. end
  133.  
  134. gui.InputBegan:Connect(function(input)
  135. if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
  136. dragging = true
  137. dragStart = input.Position
  138. startPos = gui.Position
  139.  
  140. input.Changed:Connect(function()
  141. if input.UserInputState == Enum.UserInputState.End then
  142. dragging = false
  143. end
  144. end)
  145. end
  146. end)
  147.  
  148. gui.InputChanged:Connect(function(input)
  149. if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
  150. dragInput = input
  151. end
  152. end)
  153.  
  154. UserInputService.InputChanged:Connect(function(input)
  155. if input == dragInput and dragging then
  156. update(input)
  157. end
  158. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement