SHARE
TWEET

Untitled

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