Advertisement
Th3realdylan

I'm annoying

Jun 15th, 2019
198
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.95 KB | None | 0 0
  1. if game.Players.LocalPlayer.PlayerGui:FindFirstChild("DupeGUI") then
  2. return
  3. end
  4. -- Instances:
  5. local DupeGUI = Instance.new("ScreenGui")
  6. local MainFrame = Instance.new("Frame")
  7. local Header = Instance.new("TextLabel")
  8. local DuprFrame = Instance.new("Frame")
  9. local DupeMode = Instance.new("TextButton")
  10. local NotifyText = Instance.new("TextLabel")
  11. --Properties:
  12. DupeGUI.Name = "DupeGUI"
  13. DupeGUI.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
  14. DupeGUI.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  15.  
  16. MainFrame.Name = "MainFrame"
  17. MainFrame.Parent = DupeGUI
  18. MainFrame.Active = true
  19. MainFrame.BackgroundColor3 = Color3.new(0.317647, 0.0901961, 1)
  20. MainFrame.BorderSizePixel = 0
  21. MainFrame.Position = UDim2.new(0.140664965, 0, 0.236162364, 0)
  22. MainFrame.Size = UDim2.new(0, 105, 0, 27)
  23.  
  24. Header.Name = "Header"
  25. Header.Parent = MainFrame
  26. Header.BackgroundColor3 = Color3.new(1, 1, 1)
  27. Header.BackgroundTransparency = 1
  28. Header.BorderSizePixel = 0
  29. Header.Size = UDim2.new(0, 105, 0, 27)
  30. Header.Font = Enum.Font.ArialBold
  31. Header.Text = "DupR"
  32. Header.TextColor3 = Color3.new(1, 1, 1)
  33. Header.TextSize = 14
  34.  
  35. DuprFrame.Name = "DuprFrame"
  36. DuprFrame.Parent = MainFrame
  37. DuprFrame.Active = true
  38. DuprFrame.BackgroundColor3 = Color3.new(1, 1, 1)
  39. DuprFrame.BorderSizePixel = 0
  40. DuprFrame.Position = UDim2.new(0, 0, 1, 0)
  41. DuprFrame.Size = UDim2.new(0, 105, 0, 60)
  42.  
  43. DupeMode.Name = "DupeMode"
  44. DupeMode.Parent = DuprFrame
  45. DupeMode.BackgroundColor3 = Color3.new(0.317647, 0.0901961, 1)
  46. DupeMode.BorderSizePixel = 0
  47. DupeMode.Position = UDim2.new(0.123809531, 0, 0.116666667, 0)
  48. DupeMode.Size = UDim2.new(0, 78, 0, 30)
  49. DupeMode.Font = Enum.Font.ArialBold
  50. DupeMode.Text = "Dupe Mode"
  51. DupeMode.TextColor3 = Color3.new(1, 1, 1)
  52. DupeMode.TextSize = 14
  53.  
  54. NotifyText.Name = "NotifyText"
  55. NotifyText.Parent = DuprFrame
  56. NotifyText.BackgroundColor3 = Color3.new(1, 1, 1)
  57. NotifyText.BackgroundTransparency = 1
  58. NotifyText.BorderSizePixel = 0
  59. NotifyText.Position = UDim2.new(0, 0, 0.616666675, 0)
  60. NotifyText.Size = UDim2.new(0, 105, 0, 23)
  61. NotifyText.Font = Enum.Font.ArialBold
  62. NotifyText.Text = "Text"
  63. NotifyText.TextColor3 = Color3.new(0.317647, 0.0901961, 1)
  64. NotifyText.TextSize = 14
  65. NotifyText.TextTransparency = 1
  66. -- Scripts:
  67.  
  68. --//Dragging\\--
  69. local dragging
  70. local dragInput
  71. local dragStart
  72. local startPos
  73.  
  74. local function update(input)
  75. local delta = input.Position - dragStart
  76. MainFrame:TweenPosition(UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y),'Out','Linear',0.08,true)
  77. end
  78. Header.InputBegan:Connect(function(input)
  79. if input.UserInputType == Enum.UserInputType.MouseButton1 then
  80. dragging = true
  81. dragStart = input.Position
  82. startPos = MainFrame.Position
  83.  
  84. repeat wait() until input.UserInputState == Enum.UserInputState.End
  85. dragging = false
  86. end
  87. end)
  88. Header.InputChanged:Connect(function(input)
  89. if input.UserInputType == Enum.UserInputType.MouseMovement then
  90. dragInput = input
  91. end
  92. end)
  93. game:GetService("UserInputService").InputChanged:Connect(function(input)
  94. if input == dragInput and dragging then
  95. update(input)
  96. end
  97. end)
  98.  
  99. --//Variables\\--
  100. local NotifyAnimating = false
  101.  
  102. --//Functions\\
  103. function notify(msg)
  104. if NotifyAnimating then return end
  105. spawn(function()
  106. NotifyAnimating = true
  107. NotifyText.Visible = true
  108. NotifyText.Text = msg
  109. for i=1, 20 do
  110. NotifyText.TextTransparency = NotifyText.TextTransparency - 0.05
  111. wait()
  112. end
  113. wait(1)
  114. for i=1, 20 do
  115. NotifyText.TextTransparency = NotifyText.TextTransparency + 0.05
  116. wait()
  117. end
  118. NotifyText.Visible = false
  119. NotifyAnimating = false
  120. end)
  121. end
  122. --//DupeMode\\--
  123.  
  124. DupeMode.MouseButton1Click:connect(function()
  125. local plr = game:GetService("Players").LocalPlayer
  126. local slot = plr.CurrentSaveSlot
  127. if Option == false then
  128. if slot.Value == -1 then
  129. Option = true
  130. slot.RobloxLocked = true
  131. notify("Dupe Mode On")
  132. end
  133. else
  134. Option = false
  135. slot.RobloxLocked = false
  136. notify("Dupe Mode Off")
  137. end
  138. end)
  139.  
  140. --//End\\--
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement