Advertisement
Guest User

Force

a guest
Oct 22nd, 2017
77
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.14 KB | None | 0 0
  1. print("Hello world!")
  2. game:GetService("Workspace").Name = "Workspace"
  3. game:GetService("Players").Name = "Players"
  4. game:GetService("ReplicatedStorage").Name = "ReplicatedStorage"
  5. p = game.Players.LocalPlayer
  6. GetMouse = p:GetMouse()
  7. where = game.CoreGui--[CHANGE TO "p.PlayerGui" if you're in studio]--
  8. LocalGui = Instance.new("ScreenGui", where); LocalGui.Name = "EvolGui"
  9. Box = Instance.new("TextBox", LocalGui); Box.Visible = false; Box.Name = "sLabel"; Box.Position = UDim2.new(0,500,0,550); Box.Size = UDim2.new(0,280,0,50); Box.BackgroundTransparency = 0.6; Box.BorderSizePixel = 3; Box.TextScaled = true
  10.  
  11.  
  12.  
  13. Evol = Instance.new("Folder", game); Evol.Name = "Evol"
  14. WHO = Instance.new("StringValue", Evol); WHO.Name = "Ocal"; WHO.Value = ""
  15. Parti = Instance.new("TextBox", Evol)
  16.  
  17. aim = "No"
  18. function clearbots()
  19. local children = game.CoreGui:GetChildren()
  20. for i = 1, #children do
  21. if children[i].Name == "HAX" then
  22. children[i]:Destroy()
  23. end
  24. aim = "No"
  25. end
  26. end
  27.  
  28. GetMouse.KeyDown:connect(function(key)
  29. if key == "p" then
  30. Box.Visible = true
  31. Box:CaptureFocus()
  32. end
  33. end)
  34.  
  35.  
  36. Box.FocusLost:connect(function(enterpressed)
  37. if enterpressed then
  38. WHO.Value = Box.Text
  39. Box.Visible = false
  40. end
  41. end)
  42.  
  43. target = "No"
  44. GetMouse.KeyDown:connect(function(key)
  45. if key == "m" then
  46.  
  47. local who = WHO.Value
  48. local people = game.Players:GetChildren()
  49. for i = 1, #people do
  50. local person = people[i]
  51. local personname = person.Name
  52.  
  53. if personname == who then
  54. local ochar = person.Character
  55. local did = 0
  56.  
  57. if did == 0 then
  58. if target == "No" then
  59. ochar.HumanoidRootPart.CFrame = p.Character.HumanoidRootPart.CFrame
  60. ochar.HumanoidRootPart.Anchored = true
  61. target = "Yes"
  62. did = 1
  63. end
  64. end
  65.  
  66. if did == 0 then
  67. if target == "Yes" then
  68.  
  69. ochar.HumanoidRootPart.Anchored = false
  70. did = 1
  71. target = "No"
  72. end
  73. end
  74.  
  75.  
  76.  
  77. end
  78.  
  79. end
  80.  
  81. end
  82. end)
  83.  
  84. GetMouse.KeyDown:connect(function(key)
  85. if key == "u" then
  86. local who = WHO.Value
  87. local people = game.Players:GetChildren()
  88. for i = 1, #people do
  89. local person = people[i]
  90. local personname = person.Name
  91. local worked = "Invalid"
  92. if personname == who then
  93. if person.UserId ~= 256683789 then
  94.  
  95. local ochar = person.Character
  96. p.Character.HumanoidRootPart.CFrame = ochar.HumanoidRootPart.CFrame
  97. worked = "Valid"
  98. end
  99. end
  100. if worked == "Invalid" then
  101. if personname:sub(1,2,4,5,6,7,8,9,10) == who:sub(1,2,4,5,6,7,8,9,10) then
  102. if person.UserId ~= 256683789 then
  103.  
  104. local ochar = person.Character
  105. p.Character.HumanoidRootPart.CFrame = ochar.HumanoidRootPart.CFrame
  106. end
  107. end
  108. end
  109.  
  110. end
  111.  
  112.  
  113. end
  114. end)
  115.  
  116.  
  117. GetMouse.KeyDown:connect(function(key)
  118. if key == "b" then
  119. local did = 0
  120. if did == 0 then
  121. if aim == "No" then
  122. if where:FindFirstChild("HAX") then
  123. where:FindFirstChild("HAX"):Destroy()
  124. end
  125. local people = game.Players:GetChildren()
  126. for i = 1, #people do
  127. local person = people[i]
  128. local personname = person.Name
  129. if game.Workspace:FindFirstChild(personname) then
  130. if person.TeamColor ~= p.TeamColor then
  131. local ochar = person.Character
  132.  
  133.  
  134. local BASE = ochar.HumanoidRootPart
  135. local LocalGui = Instance.new('BillboardGui', where)
  136. local LocalFrame = Instance.new('Frame', LocalGui)
  137. local LocalName = Instance.new('TextLabel', LocalGui)
  138.  
  139. LocalGui.Name = 'HAX'
  140. LocalGui.Adornee = BASE
  141. LocalGui.AlwaysOnTop = true
  142. LocalGui.ExtentsOffset = Vector3.new(0, 1, 0)
  143. LocalGui.Size = UDim2.new(0, 5, 0, 5)
  144.  
  145. LocalFrame.Name = 'DOT'
  146. LocalFrame.BackgroundColor = BrickColor.new('Yellow')
  147. LocalFrame.BackgroundTransparency = 1
  148. LocalFrame.BorderSizePixel = 0
  149. LocalFrame.Position = UDim2.new(-0.5, 0, -0.5, 0)
  150. LocalFrame.Size = UDim2.new(2, 0, 2, 0)
  151. LocalFrame.Visible = true
  152. LocalFrame.ZIndex = 10
  153.  
  154. LocalName.Name = 'NAME'
  155. LocalName.BackgroundColor3 = Color3.new(0, 0, 255)
  156. LocalName.BackgroundTransparency = 1
  157. LocalName.BorderSizePixel = 3
  158. LocalName.Position = UDim2.new(0, 0, 0, -40)
  159. LocalName.Size = UDim2.new(1, 0, 10, 0)
  160. LocalName.Visible = true
  161. LocalName.ZIndex = 10
  162. LocalName.Font = 'ArialBold'
  163. LocalName.FontSize = 'Size14'
  164. LocalName.Text = BASE.Parent.Name
  165. LocalName.TextStrokeTransparency = 0
  166. LocalName.TextColor = BrickColor.new('Bright red')
  167.  
  168. aim = "Yes"
  169. did = 1
  170. end
  171. end
  172. end
  173. end
  174. end
  175.  
  176. if did == 0 then
  177. if aim == "Yes" then
  178. clearbots()
  179. end
  180. end
  181.  
  182.  
  183.  
  184.  
  185.  
  186.  
  187. end
  188. end)
  189.  
  190.  
  191.  
  192. GetMouse.KeyDown:connect(function(key)
  193. if key == "j" then
  194. p.Character.HumanoidRootPart.CFrame = CFrame.new(GetMouse.Hit.x, GetMouse.Hit.y + 3, GetMouse.Hit.z)
  195. end
  196. end)
  197.  
  198.  
  199. view = "Yes"
  200. GetMouse.KeyDown:connect(function(key)
  201. if key == "h" then
  202. local did = 0
  203. if did == 0 then
  204. if view == "Yes" then
  205.  
  206. local who = WHO.Value
  207. local people = game.Players:GetChildren()
  208. for i = 1, #people do
  209. local person = people[i]
  210. local personname = person.Name
  211. local worked = "Invalid"
  212. if personname == who then
  213. if person.UserId ~= 256683789 then
  214.  
  215. local ochar = person.Character
  216. game.Workspace.CurrentCamera.CameraSubject = ochar
  217. worked = "Valid"
  218. end
  219. end
  220. if worked == "Invalid" then
  221. if personname:sub(1,2,4,5,6,7,8,9,10) == who:sub(1,2,4,5,6,7,8,9,10) then
  222. local ochar = person.Character
  223. game.Workspace.CurrentCamera.CameraSubject = ochar
  224. end
  225. end
  226.  
  227. end
  228.  
  229.  
  230. view = "No"
  231. did = 1
  232. end
  233. end
  234.  
  235. if did == 0 then
  236. if view == "No" then
  237.  
  238. game.Workspace.CurrentCamera.CameraSubject = p.Character
  239.  
  240.  
  241. view = "Yes"
  242. did = 1
  243. end
  244. end
  245.  
  246. end
  247. end)
  248.  
  249.  
  250. froze = "No"
  251. GetMouse.KeyDown:connect(function(key)
  252. if key == "n" then
  253. local did = 0
  254. if did == 0 then
  255. if froze == "Yes" then
  256. p.Character.HumanoidRootPart.Anchored = false
  257. froze = "No"
  258. did = 1
  259. end
  260. end
  261.  
  262. if did == 0 then
  263. if froze == "No" then
  264. p.Character.HumanoidRootPart.Anchored = true
  265. froze = "Yes"
  266. did = 1
  267. end
  268. end
  269.  
  270. end
  271. end)
  272.  
  273.  
  274.  
  275.  
  276. grav = "No"
  277. GetMouse.KeyDown:connect(function(key)
  278. if key == "y" then
  279. local did = 0
  280. if did == 0 then
  281. if grav == "Yes" then
  282. for i,v in pairs(p.Character.HumanoidRootPart:GetChildren()) do
  283. if v.Name == "NoGrav" then
  284. v:Destroy()
  285. end
  286. end
  287. grav = "No"
  288. did = 1
  289. end
  290. end
  291.  
  292. if did == 0 then
  293. if grav == "No" then
  294.  
  295. local BF = Instance.new("BodyForce", p.Character.HumanoidRootPart)
  296. BF.Name = "NoGrav"
  297. BF.Force = Vector3.new(0,5000,0)
  298.  
  299.  
  300. grav = "Yes"
  301. did = 1
  302. end
  303. end
  304.  
  305. end
  306. end)
  307. print("Done!")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement