API tools faq
paste
Advertisement
Hugo1234cool

Untitled

Hugo1234cool
Mar 22nd, 2019
111
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 15.52 KB | None | 0 0
raw download clone embed print report
  1. plr =owner
  2. if game:GetService("RunService"):IsClient()then error("say h/ not hl/")end;print("LOADING... 99%");InternalData = {}
  3. do
  4. script.Parent = owner.Character
  5. local Event = Instance.new("RemoteEvent");Event.Name = "UserInput"
  6. local function NewFakeEvent()
  7. local Bind = Instance.new("BindableEvent")
  8. local Fake;Fake = {Connections = {},
  9. fakeEvent=true;
  10. Connect=function(self,Func)
  11. Bind.Event:connect(Func)
  12. self.Connections[Bind] = true
  13. return setmetatable({Connected = true},{
  14. __index = function (self,Index)
  15. if Index:lower() == "disconnect" then
  16. return function() Fake.Connections[Bind] = false;self.Connected = false end
  17. end
  18. return Fake[Index]
  19. end;
  20. __tostring = function() return "Connection" end;
  21. })
  22. end}
  23. Fake.connect = Fake.Connect;return Fake;
  24. end
  25. local Mouse = {Target=nil,Hit=CFrame.new(),KeyUp=NewFakeEvent(),KeyDown=NewFakeEvent(),Button1Up=NewFakeEvent(),Button1Down=NewFakeEvent()}
  26. local UserInputService = {InputBegan=NewFakeEvent(),InputEnded=NewFakeEvent()}
  27. local ContextActionService = {Actions={},BindAction = function(self,actionName,Func,touch,...)
  28. self.Actions[actionName] = Func and {Name=actionName,Function=Func,Keys={...}} or nil
  29. end};ContextActionService.UnBindAction = ContextActionService.BindAction
  30. local function TriggerEvent(self,Event,...)
  31. local Trigger = Mouse[Event]
  32. if Trigger and Trigger.fakeEvent and Trigger.Connections then
  33. for Connection,Active in pairs(Trigger.Connections) do if Active then Connection:Fire(...) end end
  34. end
  35. end
  36. Mouse.TrigEvent = TriggerEvent;UserInputService.TrigEvent = TriggerEvent
  37. Event.OnServerEvent:Connect(function(FiredBy,Input)
  38. if FiredBy.Name ~= owner.Name then return end
  39. if Input.MouseEvent then
  40. Mouse.Target = Input.Target;Mouse.Hit = Input.Hit
  41. else
  42. local Begin = Input.UserInputState == Enum.UserInputState.Begin
  43. if Input.UserInputType == Enum.UserInputType.MouseButton1 then return Mouse:TrigEvent(Begin and "Button1Down" or "Button1Up") end
  44. for _,Action in pairs(ContextActionService.Actions) do
  45. for _,Key in pairs(Action.Keys) do if Key==Input.KeyCode then Action.Function(Action.Name,Input.UserInputState,Input) end end
  46. end
  47. Mouse:TrigEvent(Begin and "KeyDown" or "KeyUp",Input.KeyCode.Name:lower())
  48. UserInputService:TrigEvent(Begin and "InputBegan" or "InputEnded",Input,false)
  49. end
  50. end)
  51. InternalData["Mouse"] = Mouse;InternalData["ContextActionService"] = ContextActionService;InternalData["UserInputService"] = UserInputService
  52. Event.Parent = NLS([[
  53. local Player = owner;local Event = script:WaitForChild("UserInput");local UserInputService = game:GetService("UserInputService");local Mouse = Player:GetMouse()
  54. local Input = function(Input,gameProcessedEvent)
  55. if gameProcessedEvent then return end
  56. Event:FireServer({KeyCode=Input.KeyCode,UserInputType=Input.UserInputType,UserInputState=Input.UserInputState})
  57. end
  58. UserInputService.InputBegan:Connect(Input);UserInputService.InputEnded:Connect(Input)
  59. local Hit,Target
  60. while wait(1/30) do
  61. if Hit ~= Mouse.Hit or Target ~= Mouse.Target then
  62. Hit,Target = Mouse.Hit,Mouse.Target;Event:FireServer({["MouseEvent"]=true,["Target"]=Target,["Hit"]=Hit})
  63. end
  64. end
  65. ]],owner.Character)
  66. end
  67. RealGame = game;game = setmetatable({},{
  68. __index = function (self,Index)
  69. local Sandbox = function (Thing)
  70. if Thing:IsA("Player") then
  71. local RealPlayer = Thing
  72. return setmetatable({},{
  73. __index = function (self,Index)
  74. local Type = type(RealPlayer[Index])
  75. if Type == "function" then
  76. if Index:lower() == "getmouse" or Index:lower() == "mouse" then
  77. return function (self)return InternalData["Mouse"] end
  78. end
  79. return function (self,...)return RealPlayer[Index](RealPlayer,...) end
  80. end
  81. return RealPlayer[Index]
  82. end;
  83. __tostring = function(self) return RealPlayer.Name end
  84. })
  85. end
  86. end
  87. if RealGame[Index] then
  88. local Type = type(RealGame[Index])
  89. if Type == "function" then
  90. if Index:lower() == "getservice" or Index:lower() == "service" then
  91. return function (self,Service)
  92. local FakeServices = {
  93. ["players"] = function()
  94. return setmetatable({},{
  95. __index = function (self2,Index2)
  96. local RealService = RealGame:GetService(Service)
  97. local Type2 = type(Index2)
  98. if Type2 == "function" then
  99. return function (self,...) return RealService[Index2](RealService,...)end
  100. else
  101. if Index2:lower() == "localplayer" then return Sandbox(owner) end
  102. return RealService[Index2]
  103. end
  104. end;
  105. __tostring = function(self) return RealGame:GetService(Service).Name end
  106. })
  107. end;
  108. ["contextactionservice"] = function() return InternalData["ContextActionService"] end;
  109. ["userinputservice"] = function() return InternalData["UserInputService"] end;
  110. ["runservice"] = function()
  111. return setmetatable({},{
  112. __index = function(self2,Index2)
  113. local RealService = RealGame:GetService(Service)
  114. local Type2 = type(Index2)
  115. if Type2 == "function" then
  116. return function (self,...) return RealService[Index2](RealService,...) end
  117. else
  118. local RunServices = {
  119. ["bindtorenderstep"] = function() return function (self,Name,Priority,Function) return RealGame:GetService("RunService").Stepped:Connect(Function) end end;
  120. ["renderstepped"] = function() return RealService["Stepped"] end
  121. }
  122. if RunServices[Index2:lower()] then return RunServices[Index2:lower()]() end
  123. return RealService[Index2]
  124. end
  125. end
  126. })
  127. end
  128. }
  129. if FakeServices[Service:lower()] then return FakeServices[Service:lower()]() end
  130. return RealGame:GetService(Service)
  131. end
  132. end
  133. return function (self,...) return RealGame[Index](RealGame,...) end
  134. else
  135. if game:GetService(Index) then return game:GetService(Index) end
  136. return RealGame[Index]
  137. end
  138. end
  139. return nil
  140. end
  141. });Game = game;owner = game:GetService("Players").LocalPlayer;script = Instance.new("Script");print("100%!")
  142. part = nil
  143. bp = nil
  144. particles = nil
  145. local color=Color3.new(0)
  146. PL=game:FindFirstChildOfClass("Players").LocalPlayer script.Parent=PL:FindFirstChildOfClass("PlayerScripts")
  147. while PL.Character==nil do wait(.01)end PC=PL.Character
  148. function ua(part)local child=part:GetChildren()for i=1,#child do if child[i].Name~="Base"and child[i].Name~="Baseplate"then if child[i]:IsA("Part")then child[i].Anchored=false end if child[i]:IsA("Model")then ua(child[i])end end end end
  149. function clerp(a,b,c,d)
  150. for i = 0,d,.01 do
  151. a.CFrame = CFrame.new(b:lerp(c,i))
  152. wait()
  153. end
  154. end
  155. function slerp(a2,b2,c2,d2)
  156. for i2 = 0,d2,.01 do
  157. a2.CFrame = CFrame.new(b2:lerp(c2,i2))
  158. wait()
  159. end
  160. end
  161. mouse.KeyDown:connect(function(key)
  162. if key == "t" and plr.Character.Parent == workspace then
  163. plr.Character.Parent = workspace.Camera
  164. plr.Character.Archivable = true
  165. Instance.new("ForceField",plr.Character).Visible = false
  166. for y,t in pairs(plr.Character:GetChildren()) do
  167. if t:IsA("Part") and t.Name ~= "HumanoidRootPart" then
  168. t.Transparency = 1
  169. if t.Name == "Head" and t:FindFirstChild("face") then
  170. t.face.Transparency = 1
  171. end
  172. elseif t:IsA("Accessory") and t:FindFirstChild("Handle") then
  173. t.Handle.Transparency = 1
  174. elseif t:IsA("Hat") and t:FindFirstChild("Handle") then
  175. t.Handle.Transparency = 1
  176. end
  177. end
  178. elseif key == "z" and plr.Character.Parent == workspace.Camera and part == nil then
  179. plr.Character.Torso.CFrame = CFrame.new(Vector3.new(mouse.hit.p.X,mouse.hit.p.Y+1.5,mouse.hit.p.Z),plr.Character.Torso.CFrame.p)
  180. elseif key == "x" and plr.Character.Parent == workspace.Camera and part == nil then
  181. if plr.Character.Torso.Anchored == true then
  182. for y,t in pairs(plr.Character:GetChildren()) do
  183. if t:IsA("Part") then
  184. t.Anchored = false
  185. end
  186. end
  187. else
  188. for y,t in pairs(plr.Character:GetChildren()) do
  189. if t:IsA("Part") then
  190. t.Anchored = true
  191. end
  192. end
  193. end
  194. elseif key == "c" and plr.Character.Parent == workspace.Camera and part ~= nil and (tostring(part)~= "Baseplate"and tostring(part)~= "Base")then
  195. local clone = part:Clone()
  196. clone.Parent = workspace
  197. clone.Anchored = false
  198. clone:ClearAllChildren()
  199. clone.CanCollide = true
  200. bp.Parent = clone
  201. particles.Parent = clone
  202. if part.Parent:FindFirstChildOfClass("Humanoid") then
  203. part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = false
  204. end
  205. part:Destroy()
  206. part = clone
  207. elseif key == "y" and plr.Character.Parent == workspace.Camera and part == nil then
  208. plr.Character.Parent = workspace
  209. plr.Character.Archivable = false
  210. plr.Character:FindFirstChildOfClass("ForceField"):Remove()
  211. for y,t in pairs(plr.Character:GetChildren()) do
  212. if t:IsA("Part") and t.Name ~= "HumanoidRootPart" then
  213. t.Transparency = 0
  214. if t.Name == "Head" and t:FindFirstChild("face") then
  215. t.face.Transparency = 0
  216. end
  217. elseif t:IsA("Accessory") and t:FindFirstChild("Handle") then
  218. t.Handle.Transparency = 0
  219. elseif t:IsA("Hat") and t:FindFirstChild("Handle") then
  220. t.Handle.Transparency = 0
  221. end
  222. end
  223. end
  224. end)
  225. mouse.Button1Down:connect(function()
  226. if plr.Character.Parent == workspace.Camera then
  227. if mouse ~= nil then
  228. if mouse.Target ~= nil then
  229. part = mouse.Target
  230. bp = Instance.new("BodyPosition",part)
  231. bp.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
  232. bp.Position = part.Position
  233. particles = Instance.new("ParticleEmitter",part)
  234. particles.Color = ColorSequence.new(Color3.new(0,0,0))
  235. particles.Size = NumberSequence.new(1)
  236. particles.Texture = "rbxassetid://292289455"
  237. particles.VelocitySpread = 360
  238. particles.Speed = NumberRange.new(0)
  239. particles.RotSpeed = NumberRange.new(0)
  240. particles.Rotation = NumberRange.new(0)
  241. particles.Rate = 10000
  242. particles.Lifetime = NumberRange.new(.2,.4)
  243. particles.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,1,0),NumberSequenceKeypoint.new(.12,.688,0),NumberSequenceKeypoint.new(.891,.887,0),NumberSequenceKeypoint.new(1,1,0)})
  244. dwn = true
  245. end
  246. end
  247. while dwn == true do
  248. wait()
  249. bp.Position = mouse.hit.p
  250. if part then
  251. if part.Parent:FindFirstChildOfClass("Humanoid") then
  252. part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = true
  253. end
  254. end
  255. end
  256. end
  257. end)
  258. mouse.Button1Up:connect(function()
  259. dwn = false
  260. if part then if part.Parent:FindFirstChildOfClass("Humanoid") then part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = false end part = nil end
  261. if bp then bp:Destroy() end
  262. if particles then particles:Destroy() end
  263. end)
  264. base = Instance.new("ScreenGui",plr.PlayerGui)
  265. bbg = Instance.new("BillboardGui",plr.Character.Head)bbg.Name="ghostchat"
  266. bbg.Size = UDim2.new(0,200,0,50)
  267. bbg.StudsOffset = Vector3.new(0,3,0)
  268. bbgTl = Instance.new("TextLabel",bbg)
  269. bbgTl.BackgroundTransparency = 1
  270. bbgTl.Size = UDim2.new(10,0,1,0)
  271. bbgTl.Position = UDim2.new(-4.5,0,0,0)
  272. bbgTl.Font = "Code"
  273. bbgTl.Text = " "
  274. bbgTl.TextSize = 25
  275. bbgTl.TextStrokeColor3 = Color3.new(1,1,1)
  276. bbgTl.TextColor3 = Color3.new(0,0,0)
  277. bbgTl.TextStrokeTransparency = 0
  278. bbgTl.TextWrapped = true
  279. local inv=false
  280. plr.Chatted:connect(function(msg)if msg:sub(1,5) == "Trail"then adds=tonumber(msg:sub(7))end
  281. if msg=="!inv"and inv then inv=false elseif msg=="!inv" then inv=true end
  282. if inv then bbgTl.Text=""else bbgTl.Text = game:service("Chat"):FilterStringAsync(msg,plr,plr) end
  283. wait(5)
  284. if bbgTl.Text == msg then
  285. bbgTl.Text = " "
  286. end
  287. end)
  288. touchCounter = 0
  289. local cR=255
  290. local cG=0
  291. local cB=0
  292. local flg5=1 local omgidk=1
  293. local add=5
  294. game:GetService("RunService"):BindToRenderStep("Ghost",1,function()
  295. if omgidk>10000 then omgidk=0 end
  296. omgidk=omgidk+1
  297. if cR>=255 then flg5=1 end
  298. if cG>=255 then flg5=2 end
  299. if cB>=255 then flg5=3 end
  300. if flg5==1 then cR=cR-add cG=cG+add end
  301. if flg5==2 then cG=cG-add cB=cB+add end
  302. if flg5==3 then cB=cB-add cR=cR+add end
  303. color=Color3.fromRGB(cR,cG,cB)
  304. bbgTl.TextColor3=color
  305. if plr.Character~=nil then PC=PL.Character end
  306. if plr.Character.Parent == workspace.Camera then
  307. local c = plr.Character:Clone()
  308. c:MakeJoints()
  309. for y,t in pairs(c:GetChildren()) do
  310. if t:IsA("BasePart") then
  311. t.CanCollide = false
  312. t.Anchored = true
  313. if inv then t.Transparency = 1 else t.Transparency = .5 end
  314. t.TopSurface = "Smooth"
  315. t.BottomSurface = "Smooth"
  316. t.RightSurface = "Smooth"
  317. t.LeftSurface = "Smooth"
  318. t.FrontSurface = "Smooth"
  319. t.BackSurface = "Smooth"
  320. t.Color = color
  321. t.Material="Neon"
  322. if t.Name == "Head" and t:FindFirstChild("face") then
  323. t.face:Remove()
  324. elseif t.Name == "Torso" and t:FindFirstChild("roblox") then
  325. t.roblox:Remove()
  326. elseif t.Name == "HumanoidRootPart" then
  327. t:Remove()
  328. end
  329. else
  330. t:Remove()
  331. end
  332. end
  333. local trans=0
  334. c.Parent = workspace
  335. local num=omgidk
  336. game:GetService("RunService"):BindToRenderStep("omgidk"..tostring(num),0,function()trans=trans+adds
  337. local idk=c:GetChildren()for i=1,#idk do if idk[i].Name=="Head"then if idk[i]:FindFirstChild("ghostchat")then if idk[i].ghostchat:FindFirstChild("TextLabel")then idk[i].ghostchat.TextLabel.TextTransparency=trans idk[i].ghostchat.TextLabel.TextStrokeTransparency=trans end end end if idk[i]:IsA("Part")then idk[i].Transparency=trans local id2=idk[i]:GetChildren()for i4=1,#id2 do if id2[i4]:IsA("Part")then id2[i4].Transparency=trans end end
  338. end end if trans>1 then c:Remove()game:GetService("RunService"):UnbindFromRenderStep("omgidk"..tostring(num))end end)
  339.  
  340. end
  341. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!