D3M0N_Scripts

TEST

Jan 21st, 2023 (edited)
27
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.38 KB | None | 0 0
  1. local function NQWSTGE_fake_script() -- Frame.Fly
  2. local script = Instance.new('LocalScript', Frame)
  3.  
  4. local plr = script.Parent.Parent.Parent.Parent
  5. repeat wait() until plr and plr.Character and plr.Character:findFirstChild("HumanoidRootPart") and plr.Character:findFirstChild("Humanoid")
  6. local mouse = game.Players.LocalPlayer:GetMouse()
  7. repeat wait() until mouse
  8.  
  9. local torso = plr.Character.HumanoidRootPart
  10. local flying = false
  11. local deb = true
  12. local ctrl = {f = 0, b = 0, l = 0, r = 0}
  13. local lastctrl = {f = 0, b = 0, l = 0, r = 0}
  14. local maxspeed = 1000
  15. local speed = 50
  16. function Fly()
  17. local bg = Instance.new("BodyGyro", torso)
  18. bg.P = 9e4
  19. bg.maxTorque = Vector3.new(9e9, 9e9, 9e9)
  20. bg.cframe = torso.CFrame
  21. local bv = Instance.new("BodyVelocity", torso)
  22. bv.velocity = Vector3.new(0,0.1,0)
  23. bv.maxForce = Vector3.new(9e9, 9e9, 9e9)
  24. repeat wait()
  25. plr.Character.Humanoid.PlatformStand = true
  26. if ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0 then
  27. speed = speed+.5+(speed/maxspeed)
  28. if speed > maxspeed then
  29. speed = maxspeed
  30. end
  31. elseif not (ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0) and speed ~= 0 then
  32. speed = speed-1
  33. if speed < 0 then
  34. speed = 0
  35. else
  36. speed = 50
  37. end
  38. end
  39. if (ctrl.l + ctrl.r) ~= 0 or (ctrl.f + ctrl.b) ~= 0 then
  40. bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (ctrl.f+ctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(ctrl.l+ctrl.r,(ctrl.f+ctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed
  41. lastctrl = {f = ctrl.f, b = ctrl.b, l = ctrl.l, r = ctrl.r}
  42. elseif (ctrl.l + ctrl.r) == 0 and (ctrl.f + ctrl.b) == 0 and speed ~= 0 then
  43. bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (lastctrl.f+lastctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(lastctrl.l+lastctrl.r,(lastctrl.f+lastctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed
  44. else
  45. bv.velocity = Vector3.new(0,0.1,0)
  46. end
  47. bg.cframe = game.Workspace.CurrentCamera.CoordinateFrame * CFrame.Angles(-math.rad((ctrl.f+ctrl.b)*50*speed/maxspeed),0,0)
  48. until not flying
  49. ctrl = {f = 0, b = 0, l = 0, r = 0}
  50. lastctrl = {f = 0, b = 0, l = 0, r = 0}
  51.  
  52. bg:Destroy()
  53. bv:Destroy()
  54. plr.Character.Humanoid.PlatformStand = false
  55. speed = 50
  56. end
  57.  
  58. mouse.KeyDown:connect(function(key)
  59. if key:lower() == "e" then
  60. if flying then flying = false
  61. speed = 50
  62. else
  63. flying = true
  64. Fly()
  65.  
  66. end
  67. elseif key:lower() == "w" then
  68. ctrl.f = 1
  69. elseif key:lower() == "s" then
  70. ctrl.b = -1
  71. elseif key:lower() == "a" then
  72. ctrl.l = -1
  73. elseif key:lower() == "d" then
  74. ctrl.r = 1
  75. end
  76. end)
  77. mouse.KeyUp:connect(function(key)
  78. if key:lower() == "w" then
  79. ctrl.f = 0
  80. elseif key:lower() == "s" then
  81. ctrl.b = 0
  82. elseif key:lower() == "a" then
  83. ctrl.l = 0
  84. elseif key:lower() == "d" then
  85. ctrl.r = 0
  86. end
  87. end)
  88.  
  89. plr.Character.Humanoid.StateChanged:Connect(function(o,n)
  90. if n == Enum.HumanoidStateType.Running then
  91. ctrl.f = 1
  92. else
  93. ctrl.f = 0
  94. end
  95.  
  96. end)
  97. script.Parent.TextButton.MouseButton1Click:Connect(function()
  98. if flying then
  99. flying = false
  100. speed = 50
  101. else
  102. flying = true
  103. Fly()
  104. end
  105. end)
  106.  
  107. end
  108. coroutine.wrap(NQWSTGE_fake_script)()
  109. local function RAQA_fake_script() -- Frame.Buttons
  110. local script = Instance.new('LocalScript', Frame)
  111.  
  112. local Trigger = script.Parent.MiniTrext
  113. local IsMini = false
  114. function CreateTween(Instance,Style,Direction,Time,table,RepeatCount,CanRepeat,Delay)
  115. local ts = game:GetService("TweenService")
  116. local TweenInfo = TweenInfo.new(Time,Style,Direction,RepeatCount,CanRepeat,Delay)
  117. local Tween = ts:Create(Instance,TweenInfo,table)
  118. repeat wait() until Tween ~= nil
  119. return Tween
  120.  
  121. end
  122. Trigger.MouseButton1Click:Connect(function()
  123. if IsMini then
  124. CreateTween(script.Parent,Enum.EasingStyle.Quad,Enum.EasingDirection.Out,0.5,{Size = UDim2.new(0.265, 0,0.1, 0)},0,false,0.1):Play()
  125. IsMini = false
  126. Trigger.Text = "-"
  127. else
  128. CreateTween(script.Parent,Enum.EasingStyle.Quad,Enum.EasingDirection.Out,0.5,{Size = UDim2.new(0.265, 0,0.042, 0)},0,false,0.1):Play()
  129. IsMini = true
  130. Trigger.Text = "+"
  131. end
  132. end)
  133. script.Parent.Delete.MouseButton1Click:Connect(function()
  134. script.Parent.Parent:Destroy()
  135. end)
  136. end
  137. coroutine.wrap(RAQA_fake_script)()
  138. local function TKVUMP_fake_script() -- Frame.Drag Gui
  139. local script = Instance.new('LocalScript', Frame)
  140.  
  141. local UserInputService = game:GetService("UserInputService")
  142.  
  143. local gui = script.Parent
  144.  
  145. local dragging
  146. local dragInput
  147. local dragStart
  148. local startPos
  149.  
  150. local function update(input)
  151. local delta = input.Position - dragStart
  152. gui.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
  153. end
  154.  
  155. gui.InputBegan:Connect(function(input)
  156. if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
  157. dragging = true
  158. dragStart = input.Position
  159. startPos = gui.Position
  160.  
  161. input.Changed:Connect(function()
  162. if input.UserInputState == Enum.UserInputState.End then
  163. dragging = false
  164. end
  165. end)
  166. end
  167. end)
  168.  
  169. gui.InputChanged:Connect(function(input)
  170. if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
  171. dragInput = input
  172. end
  173. end)
  174.  
  175. UserInputService.InputChanged:Connect(function(input)
  176. if input == dragInput and dragging then
  177. update(input)
  178. end
  179. end)
  180. end
  181. coroutine.wrap(TKVUMP_fake_script)()
Tags: test nothing
Add Comment
Please, Sign In to add comment