Advertisement
iceeeeeaa

ok

Jan 19th, 2017
145
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.85 KB | None | 0 0
  1. --[[
  2.  
  3. Made by Krebz
  4.  
  5. --]]
  6.  
  7. --Loader
  8.  
  9. local GUI = Instance.new("ScreenGui", game.CoreGui)
  10. GUI.Name = "Zero"
  11. local topdrag = Instance.new("Frame", GUI)
  12. topdrag.Name, topdrag.Size, topdrag.Position, topdrag.BackgroundColor3, topdrag.BorderSizePixel, topdrag.BackgroundTransparency, topdrag.Active, topdrag.Draggable, topdrag.ZIndex = "Drag", UDim2.new(0,400,0,12), UDim2.new(0.5,-200,0.5,-300), Color3.new(0,0,0), 0, 0, true, true, 9
  13. local x = Instance.new("TextButton", topdrag)
  14. x.Name, x.Size, x.Position, x.BackgroundColor3, x.BorderSizePixel, x.BackgroundTransparency, x.Active, x.Draggable, x.ZIndex, x.Text, x.TextColor3 = "X", UDim2.new(0,12,0,12), UDim2.new(0.5,188,0.5,-6), Color3.new(0,0,0), 0, 0, false, false, 10, "X", Color3.new(255,255,255)
  15. local minimize = Instance.new("TextButton", topdrag)
  16. minimize.Name, minimize.Size, minimize.Position, minimize.BackgroundColor3, minimize.BorderSizePixel, minimize.BackgroundTransparency, minimize.Active, minimize.Draggable, minimize.ZIndex, minimize.Text, minimize.TextColor3 = "-", UDim2.new(0,12,0,12), UDim2.new(0.5,176,0.5,-6), Color3.new(0,0,0), 0, 0, false, false, 10, "-", Color3.new(255,255,255)
  17. local openUI = Instance.new("TextButton", GUI)
  18. openUI.Name, openUI.Size, openUI.Position, openUI.BorderSizePixel, openUI.Text, openUI.BackgroundTransparency, openUI.BackgroundColor3, openUI.TextColor3 = "Open", UDim2.new(0,200,0,50), UDim2.new(-1.7,25,0,400), 0, "Open", 0.5, Color3.new(0,0,0), Color3.new(255,255,255)
  19. local Frame_1 = Instance.new("Frame", topdrag)
  20. Frame_1.Name, Frame_1.Size, Frame_1.Position, Frame_1.BackgroundColor3, Frame_1.BorderSizePixel, Frame_1.BackgroundTransparency, Frame_1.Active, Frame_1.Draggable = "List", UDim2.new(0,400,0,400), UDim2.new(0,0,0,0), Color3.new(0,0,0), 0, 0.5, true, false
  21. local Scroll = Instance.new("ScrollingFrame", Frame_1)
  22. Scroll.Name, Scroll.Size, Scroll.Position, Scroll.BorderSizePixel, Scroll.BackgroundTransparency, Scroll.CanvasSize, Scroll.ZIndex, Scroll.ScrollBarThickness = "Scroll", UDim2.new(0,350,0,350), UDim2.new(0.5,-175,0.5,-175), 0, 1, UDim2.new(0,350,0,1000000), 10, 10
  23. local Text = Instance.new("TextBox", Scroll)
  24. Text.Name, Text.Size, Text.Position, Text.BorderSizePixel, Text.Font, Text.FontSize, Text.Text, Text.MultiLine, Text.ClearTextOnFocus, Text.ZIndex, Text.TextXAlignment, Text.TextYAlignment, Text.TextColor3, Text.BackgroundColor3 = "Text", UDim2.new(0,340,0,1000000), UDim2.new(0,0,0,0), 0, "SourceSansBold", "Size11", "", true, false, 9, "Left", "Top", Color3.new(0,0,0), Color3.new(255,255,255)
  25. local exe = Instance.new("TextButton", Frame_1)
  26. exe.Name, exe.Size, exe.Position, exe.BorderSizePixel, exe.Text, exe.BackgroundTransparency, exe.BackgroundColor3, exe.TextColor3 = "Execute", UDim2.new(0,200,0,50), UDim2.new(0,0,0,400), 0, "Execute", 0.5, Color3.new(0,0,0), Color3.new(255,255,255)
  27. local clear = Instance.new("TextButton", Frame_1)
  28. clear.Name, clear.Size, clear.Position, clear.BorderSizePixel, clear.Text, clear.BackgroundTransparency, clear.BackgroundColor3, clear.TextColor3 = "Clear", UDim2.new(0,200,0,50), UDim2.new(0,200,0,400), 0, "Clear", 0.5, Color3.new(0,0,0), Color3.new(255,255,255)
  29. local toggle = false
  30.  
  31. clear.MouseButton1Click:connect(function()
  32. Text.Text = ""
  33. end)
  34.  
  35. exe.MouseButton1Click:connect(function()
  36. loadstring(Text.Text)()
  37. end)
  38.  
  39. x.MouseButton1Click:connect(function()
  40. GUI:Remove()
  41. end)
  42.  
  43. minimize.MouseButton1Click:connect(function()
  44. if toggle == false then
  45. topdrag:TweenPosition(UDim2.new(-1.7,-200,0.5,-300), 'Out', 'Quad', 1)
  46. openUI:TweenPosition(UDim2.new(0,25,0,400), 'Out', 'Quad', 1)
  47. toggle = true
  48. end
  49. end)
  50.  
  51. openUI.MouseButton1Click:connect(function()
  52. if toggle == true then
  53. topdrag:TweenPosition(UDim2.new(0.5,-200,0.5,-300), 'Out', 'Quad', 1)
  54. openUI:TweenPosition(UDim2.new(-1.7,25,0,400), 'Out', 'Quad', 1)
  55. toggle = false
  56. end
  57. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement