Advertisement
asjkljrlfkjrwoierjwe

OMGHAX ROBLOX

May 17th, 2015
350
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.77 KB | None | 0 0
  1. openkey = "y"
  2.  
  3. closing=false
  4. function doclose() if not closing and not opening then closing=true
  5. if exe.Rotation == 0 then
  6. for i=0,-360,-20 do
  7. exe.Rotation=i wait()
  8. end
  9. exe.Rotation = 0
  10. for i=1,20 do
  11. exe.Position = exe.Position + UDim2.new(-0.1,0,0,0) wait()
  12. end
  13. exe.Visible=false show.Visible=true
  14. exe.Position = UDim2.new(0.5, -291, 0.5, -157)
  15. for _,mpops in pairs(CodeExecutorLocal.Parent:GetChildren()) do
  16. if mpops:IsA("ScreenGui") and mpops.Name == "MessagePopup" then
  17. mpops:Destroy()
  18. end
  19. end wait()
  20. end
  21. closing=false end
  22. end
  23.  
  24. opening=false
  25. function doopen() if not opening and not closing then opening=true
  26. exe.Visible = true
  27. show.Visible=false
  28. for i=0,360,20 do
  29. exe.Rotation = i wait()
  30. end
  31. exe.Rotation = 0
  32. if not viewed then viewed=true wait(3)
  33. for i=1,55 do
  34. V3Logo.Position = V3Logo.Position + UDim2.new(0,0,-0.02,0) wait()
  35. end
  36. V3Logo:Destroy()
  37. end
  38. end
  39. opening=false
  40. end
  41. function guimsg(header,message,duration,daddy)
  42. MessagePopup = Instance.new("ScreenGui", daddy)
  43. MessagePopup.Name = "MessagePopup"
  44.  
  45. bg = Instance.new("Frame", MessagePopup)
  46. bg.Name = "bg"
  47. bg.Position = UDim2.new(0.5, -200, 0.20000000298023, 0)
  48. bg.Size = UDim2.new(0, 400, 0, 140)
  49. bg.BackgroundColor3 = Color3.new(0, 0, 0)
  50. bg.BorderSizePixel = 0
  51. bg.Style = Enum.FrameStyle.RobloxRound
  52. bg.ZIndex = 9
  53.  
  54. title = Instance.new("TextBox", bg)
  55. title.Name = "title"
  56. title.Size = UDim2.new(1, 0, 0, 50)
  57. title.BackgroundColor3 = Color3.new(0.66666668653488, 0, 0)
  58. title.BackgroundTransparency = 1
  59. title.BorderSizePixel = 0
  60. title.Text = header
  61. title.Font = Enum.Font.SourceSansBold
  62. title.FontSize = Enum.FontSize.Size48
  63. title.TextScaled = true
  64. title.TextWrapped = true
  65. title.TextColor3 = Color3.new(0.66666668653488, 0, 0)
  66. title.ZIndex = 10
  67.  
  68. desc = Instance.new("TextBox", bg)
  69. desc.Name = "desc"
  70. desc.Position = UDim2.new(0, 0, 0, 60)
  71. desc.Size = UDim2.new(1, 0, 0, 50)
  72. desc.BackgroundColor3 = Color3.new(0.66666668653488, 0, 0)
  73. desc.BackgroundTransparency = 1
  74. desc.BorderSizePixel = 0
  75. desc.Text = message
  76. desc.Font = Enum.Font.SourceSansBold
  77. desc.FontSize = Enum.FontSize.Size36
  78. desc.TextScaled = true
  79. desc.TextWrapped = true
  80. desc.TextColor3 = Color3.new(1, 1, 1)
  81. desc.ZIndex = 10
  82. wait(duration) MessagePopup:Destroy()
  83. end
  84. function lodecode(daddy)
  85. CodeExecutorLocal = Instance.new("ScreenGui", daddy)
  86. CodeExecutorLocal.Name = "CodeExecutorLocal"
  87.  
  88. exe = Instance.new("Frame", CodeExecutorLocal)
  89. exe.Name = "exe"
  90. exe.Position = UDim2.new(0.5, -291, 0.5, -157)
  91. exe.Size = UDim2.new(0, 600, 0, 300)
  92. exe.BackgroundColor3 = Color3.new(0, 1, 0)
  93. exe.BackgroundTransparency = 0.5
  94. exe.BorderSizePixel = 0
  95. exe.Visible = false
  96. exe.Active = true
  97. exe.ZIndex = 7
  98. exe.Draggable = true
  99.  
  100. run = Instance.new("TextButton", exe)
  101. run.Name = "run"
  102. run.Position = UDim2.new(0, 0, 1, -30)
  103. run.Size = UDim2.new(0, 140, 0, 30)
  104. run.BackgroundColor3 = Color3.new(1, 1, 1)
  105. run.BorderSizePixel = 0
  106. run.Text = "Execute"
  107. run.Font = Enum.Font.ArialBold
  108. run.FontSize = Enum.FontSize.Size24
  109. run.TextColor3 = Color3.new(0, 1, 0)
  110. run.ZIndex = 10
  111.  
  112. clear = Instance.new("TextButton", exe)
  113. clear.Name = "clear"
  114. clear.Position = UDim2.new(0, 460, 1, -30)
  115. clear.Size = UDim2.new(0, 140, 0, 30)
  116. clear.BackgroundColor3 = Color3.new(1, 1, 1)
  117. clear.BorderSizePixel = 0
  118. clear.Text = "Clear"
  119. clear.Font = Enum.Font.ArialBold
  120. clear.FontSize = Enum.FontSize.Size24
  121. clear.TextWrapped = true
  122. clear.TextColor3 = Color3.new(1, 0, 0)
  123. clear.ZIndex = 10
  124.  
  125. code = Instance.new("TextBox", exe)
  126. code.Name = "code"
  127. code.Size = UDim2.new(1, 0, 0.89999997615814, 0)
  128. code.BackgroundColor3 = Color3.new(0, 0, 0)
  129. code.BorderSizePixel = 0
  130. code.Text = "print(\"Hello Local World!\")"
  131. code.FontSize = Enum.FontSize.Size11
  132. code.TextWrapped = true
  133. code.TextXAlignment = Enum.TextXAlignment.Left
  134. code.TextYAlignment = Enum.TextYAlignment.Top
  135. code.TextColor3 = Color3.new(0, 1, 0)
  136. code.ClearTextOnFocus = false
  137. code.ZIndex = 8
  138.  
  139. hide = Instance.new("TextButton", exe)
  140. hide.Name = "hide"
  141. hide.Position = UDim2.new(0.5, -70, 1, -30)
  142. hide.Size = UDim2.new(0, 140, 0, 30)
  143. hide.BackgroundColor3 = Color3.new(1, 1, 1)
  144. hide.BorderSizePixel = 0
  145. hide.Text = "Hide"
  146. hide.Font = Enum.Font.ArialBold
  147. hide.FontSize = Enum.FontSize.Size24
  148. hide.TextColor3 = Color3.new(0, 0, 0)
  149. hide.ZIndex = 10
  150.  
  151. V3Logo = Instance.new("ImageLabel", exe)
  152. V3Logo.Name = "V3Logo"
  153. V3Logo.Position = UDim2.new(0.10000000149012, 0, 0.20000000298023, 0)
  154. V3Logo.Size = UDim2.new(0.80000001192093, 0, 0.30000001192093, 0)
  155. V3Logo.BackgroundColor3 = Color3.new(1, 1, 1)
  156. V3Logo.Image = "rbxassetid://127743025"
  157. V3Logo.ZIndex = 10
  158. V3Logo.BackgroundTransparency = 1
  159. V3Logo.BorderSizePixel = 0
  160.  
  161. show = Instance.new("TextButton", CodeExecutorLocal)
  162. show.Name = "show"
  163. show.Position = UDim2.new(-0.0099999997764826, 0, 1, -30)
  164. show.Size = UDim2.new(0, 140, 0, 30)
  165. show.BackgroundColor3 = Color3.new(1, 1, 1)
  166. show.BorderSizePixel = 0
  167. show.Text = "Show "
  168. show.Font = Enum.Font.ArialBold
  169. show.FontSize = Enum.FontSize.Size24
  170. show.TextXAlignment = Enum.TextXAlignment.Right
  171. show.TextColor3 = Color3.new(0, 1, 0)
  172. show.ZIndex = 10
  173.  
  174. append = Instance.new("TextButton", exe)
  175. append.Name = "append"
  176. append.Position = UDim2.new(0.5, -70, 1, 0)
  177. append.Size = UDim2.new(0, 140, 0, 30)
  178. append.BackgroundColor3 = Color3.new(1, 1, 1)
  179. append.BorderColor3 = Color3.new(0.10588235408068, 0.16470588743687, 0.20784313976765)
  180. append.Text = "Append Code"
  181. append.Font = Enum.Font.ArialBold
  182. append.FontSize = Enum.FontSize.Size24
  183. append.TextColor3 = Color3.new(0, 0, 0)
  184. append.ZIndex = 10
  185.  
  186. nl = Instance.new("TextButton", exe)
  187. nl.Name = "nl"
  188. nl.Position = UDim2.new(0.5, -70, 1, 30)
  189. nl.Size = UDim2.new(0, 140, 0, 30)
  190. nl.BackgroundColor3 = Color3.new(1, 1, 1)
  191. nl.Text = "New Line"
  192. nl.Font = Enum.Font.ArialBold
  193. nl.FontSize = Enum.FontSize.Size24
  194. nl.TextColor3 = Color3.new(0, 0, 0)
  195. nl.ZIndex = 10
  196.  
  197. end
  198.  
  199. if pcall(function()lodecode(game.CoreGui) end) then hascore=true else
  200. pcall(function()lodecode(game.Players.LocalPlayer.PlayerGui) end) hascore=false
  201. end
  202. wait()
  203. savecode = Instance.new("StringValue") savecode.Parent = exe savecode.Name="AppendedCode" savecode.Value=""
  204.  
  205. appe=false
  206. append.MouseButton1Down:connect(function() if not appe then appe=true
  207. savecode.Value = savecode.Value..code.Text wait() append.Text = "Appended" code.Text="" wait(3) append.Text = "Append Code" appe=false end
  208. end)
  209.  
  210. nl.MouseButton1Down:connect(function() code.Text = code.Text.."\n" end)
  211.  
  212. local cl = true viewed=false
  213. show.MouseButton1Down:connect(function() if cl then cl=false
  214. doopen()
  215. cl=true end
  216. end)
  217.  
  218. hide.MouseEnter:connect(function()
  219. hide.BackgroundColor3 = Color3.new(1,0,0)
  220. end)
  221. hide.MouseLeave:connect(function()
  222. hide.BackgroundColor3 = Color3.new(1,1,1)
  223. end)
  224. run.MouseEnter:connect(function()
  225. run.BackgroundColor3 = Color3.new(0,1,0)
  226. run.TextColor3 = Color3.new(1,1,1)
  227. end)
  228. run.MouseLeave:connect(function()
  229. run.BackgroundColor3 = Color3.new(1,1,1)
  230. run.TextColor3 = Color3.new(0,1,0)
  231. end)
  232. clear.MouseEnter:connect(function()
  233. clear.BackgroundColor3 = Color3.new(1,0,0)
  234. clear.TextColor3 = Color3.new(1,1,1)
  235. end)
  236. clear.MouseLeave:connect(function()
  237. clear.BackgroundColor3 = Color3.new(1,1,1)
  238. clear.TextColor3 = Color3.new(1,0,0)
  239. end)
  240. clear.MouseButton1Down:connect(function()
  241. code.Text = "" savecode.Value=""
  242. end)
  243. show.MouseEnter:connect(function()
  244. show.BackgroundColor3 = Color3.new(0,1,0)
  245. show.TextColor3 = Color3.new(1,1,1)
  246. end)
  247. show.MouseLeave:connect(function()
  248. show.BackgroundColor3 = Color3.new(1,1,1)
  249. show.TextColor3 = Color3.new(0,1,0)
  250. end)
  251.  
  252. cl2=true
  253. hide.MouseButton1Down:connect(function() if cl2 then cl2=false
  254. doclose()
  255. cl2=true end
  256. end)
  257.  
  258. function keycheck(keyy)
  259. if type(keyy)=="string" and string.byte(string.lower(keyy)) then
  260. return string.lower(keyy)
  261. else return false end
  262. end
  263.  
  264.  
  265. game.Players.LocalPlayer:GetMouse().KeyDown:connect(function(key)
  266. if not opening and not closing then if keycheck(key)==openkey then running=true
  267. if exe.Visible then doclose()
  268. else doopen() end
  269. end end
  270. end)
  271.  
  272. local function GetError(not_errored, codee)
  273. if not_errored then
  274. codee = "Executing Code..."
  275. end
  276. for _,mpops in pairs(CodeExecutorLocal.Parent:GetChildren()) do
  277. if mpops:IsA("ScreenGui") and mpops.Name == "MessagePopup" then
  278. mpops:Destroy()
  279. end
  280. end wait()
  281. if not_errored and code.Text:match("%S+") and savecode.Value:match("%S") then
  282. guimsg('Vermillion: ',codee,3,CodeExecutorLocal.Parent)
  283. elseif not code.Text:match("%S+") and not savecode.Value:match("%S+") then
  284. guimsg('Error:',"Did not enter code.",3,CodeExecutorLocal.Parent)
  285. else
  286. guimsg('Error:',codee,3,CodeExecutorLocal.Parent)
  287. end
  288. end
  289.  
  290. deb = true
  291. run.MouseButton1Down:connect(function()
  292. if deb then deb=false
  293. coroutine.resume(coroutine.create(function(codee)
  294. local errored,output = ypcall(loadstring(savecode.Value..code.Text))
  295. GetError(errored,output)
  296. errored,output = nil
  297. end),codee)
  298. wait(1)
  299. deb=true end
  300. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement