Zomething

bhbhku ghots

Mar 18th, 2021
38
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.57 KB | None | 0 0
  1. plr = game:FindFirstChildOfClass("Players").LocalPlayer
  2. mouse = plr:GetMouse()local adds=.05
  3. part = nil
  4. bp = nil
  5. particles = nil
  6. local color=Color3.new(0)
  7. PL=game:FindFirstChildOfClass("Players").LocalPlayer script.Parent=PL:FindFirstChildOfClass("PlayerScripts")
  8. while PL.Character==nil do wait(.01)end PC=PL.Character
  9. 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
  10. function clerp(a,b,c,d)
  11. for i = 0,d,.01 do
  12. a.CFrame = CFrame.new(b:lerp(c,i))
  13. wait()
  14. end
  15. end
  16. function slerp(a2,b2,c2,d2)
  17. for i2 = 0,d2,.01 do
  18. a2.CFrame = CFrame.new(b2:lerp(c2,i2))
  19. wait()
  20. end
  21. end
  22. mouse.KeyDown:connect(function(key)
  23. if key == "t" and plr.Character.Parent == workspace then
  24. plr.Character.Parent = workspace.Camera
  25. plr.Character.Archivable = true
  26. Instance.new("ForceField",plr.Character).Visible = false
  27. for y,t in pairs(plr.Character:GetChildren()) do
  28. if t:IsA("Part") and t.Name ~= "HumanoidRootPart" then
  29. t.Transparency = 1
  30. if t.Name == "Head" and t:FindFirstChild("face") then
  31. t.face.Transparency = 1
  32. end
  33. elseif t:IsA("Accessory") and t:FindFirstChild("Handle") then
  34. t.Handle.Transparency = 1
  35. elseif t:IsA("Hat") and t:FindFirstChild("Handle") then
  36. t.Handle.Transparency = 1
  37. end
  38. end
  39. elseif key == "z" and plr.Character.Parent == workspace.Camera and part == nil then
  40. 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)
  41. elseif key == "x" and plr.Character.Parent == workspace.Camera and part == nil then
  42. if plr.Character.Torso.Anchored == true then
  43. for y,t in pairs(plr.Character:GetChildren()) do
  44. if t:IsA("Part") then
  45. t.Anchored = false
  46. end
  47. end
  48. else
  49. for y,t in pairs(plr.Character:GetChildren()) do
  50. if t:IsA("Part") then
  51. t.Anchored = true
  52. end
  53. end
  54. end
  55. elseif key == "c" and plr.Character.Parent == workspace.Camera and part ~= nil and (tostring(part)~= "Baseplate"and tostring(part)~= "Base")then
  56. local clone = part:Clone()
  57. clone.Parent = workspace
  58. clone.Anchored = false
  59. clone:ClearAllChildren()
  60. clone.CanCollide = true
  61. bp.Parent = clone
  62. particles.Parent = clone
  63. if part.Parent:FindFirstChildOfClass("Humanoid") then
  64. part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = false
  65. end
  66. part:Destroy()
  67. part = clone
  68. elseif key == "y" and plr.Character.Parent == workspace.Camera and part == nil then
  69. plr.Character.Parent = workspace
  70. plr.Character.Archivable = false
  71. plr.Character:FindFirstChildOfClass("ForceField"):Remove()
  72. for y,t in pairs(plr.Character:GetChildren()) do
  73. if t:IsA("Part") and t.Name ~= "HumanoidRootPart" then
  74. t.Transparency = 0
  75. if t.Name == "Head" and t:FindFirstChild("face") then
  76. t.face.Transparency = 0
  77. end
  78. elseif t:IsA("Accessory") and t:FindFirstChild("Handle") then
  79. t.Handle.Transparency = 0
  80. elseif t:IsA("Hat") and t:FindFirstChild("Handle") then
  81. t.Handle.Transparency = 0
  82. end
  83. end
  84. end
  85. end)
  86. mouse.Button1Down:connect(function()
  87. if plr.Character.Parent == workspace.Camera then
  88. if mouse ~= nil then
  89. if mouse.Target ~= nil then
  90. part = mouse.Target
  91. bp = Instance.new("BodyPosition",part)
  92. bp.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
  93. bp.Position = part.Position
  94. particles = Instance.new("ParticleEmitter",part)
  95. particles.Color = ColorSequence.new(Color3.new(0,0,0))
  96. particles.Size = NumberSequence.new(1)
  97. particles.Texture = "rbxassetid://292289455"
  98. particles.VelocitySpread = 360
  99. particles.Speed = NumberRange.new(0)
  100. particles.RotSpeed = NumberRange.new(0)
  101. particles.Rotation = NumberRange.new(0)
  102. particles.Rate = 10000
  103. particles.Lifetime = NumberRange.new(.2,.4)
  104. particles.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,1,0),NumberSequenceKeypoint.new(.12,.688,0),NumberSequenceKeypoint.new(.891,.887,0),NumberSequenceKeypoint.new(1,1,0)})
  105. dwn = true
  106. end
  107. end
  108. while dwn == true do
  109. wait()
  110. bp.Position = mouse.hit.p
  111. if part then
  112. if part.Parent:FindFirstChildOfClass("Humanoid") then
  113. part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = true
  114. end
  115. end
  116. end
  117. end
  118. end)
  119. mouse.Button1Up:connect(function()
  120. dwn = false
  121. if part then if part.Parent:FindFirstChildOfClass("Humanoid") then part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = false end part = nil end
  122. if bp then bp:Destroy() end
  123. if particles then particles:Destroy() end
  124. end)
  125. base = Instance.new("ScreenGui",plr.PlayerGui)
  126. bbg = Instance.new("BillboardGui",plr.Character.Head)bbg.Name="ghostchat"
  127. bbg.Size = UDim2.new(0,200,0,50)
  128. bbg.StudsOffset = Vector3.new(0,3,0)
  129. bbgTl = Instance.new("TextLabel",bbg)
  130. bbgTl.BackgroundTransparency = 1
  131. bbgTl.Size = UDim2.new(10,0,1,0)
  132. bbgTl.Position = UDim2.new(-4.5,0,0,0)
  133. bbgTl.Font = "Code"
  134. bbgTl.Text = " "
  135. bbgTl.TextSize = 25
  136. bbgTl.TextStrokeColor3 = Color3.new(1,1,1)
  137. bbgTl.TextColor3 = Color3.new(0,0,0)
  138. bbgTl.TextStrokeTransparency = 0
  139. bbgTl.TextWrapped = true
  140. local inv=false
  141. plr.Chatted:connect(function(msg)if msg:sub(1,5) == "Trail"then adds=tonumber(msg:sub(7))end
  142. if msg=="!inv"and inv then inv=false elseif msg=="!inv" then inv=true end
  143. if inv then bbgTl.Text=""else bbgTl.Text = game:service("Chat"):FilterStringAsync(msg,plr,plr) end
  144. wait(5)
  145. if bbgTl.Text == msg then
  146. bbgTl.Text = " "
  147. end
  148. end)
  149. touchCounter = 0
  150. local cR=255
  151. local cG=0
  152. local cB=0
  153. local flg5=1 local omgidk=1
  154. local add=5
  155. game:GetService("RunService"):BindToRenderStep("Ghost",1,function()
  156. if omgidk>10000 then omgidk=0 end
  157. omgidk=omgidk+1
  158. if cR>=255 then flg5=1 end
  159. if cG>=255 then flg5=2 end
  160. if cB>=255 then flg5=3 end
  161. if flg5==1 then cR=cR-add cG=cG+add end
  162. if flg5==2 then cG=cG-add cB=cB+add end
  163. if flg5==3 then cB=cB-add cR=cR+add end
  164. color=Color3.fromRGB(cR,cG,cB)
  165. bbgTl.TextColor3=color
  166. if plr.Character~=nil then PC=PL.Character end
  167. if plr.Character.Parent == workspace.Camera then
  168. local c = plr.Character:Clone()
  169. c:MakeJoints()
  170. for y,t in pairs(c:GetChildren()) do
  171. if t:IsA("BasePart") then
  172. t.CanCollide = false
  173. t.Anchored = true
  174. if inv then t.Transparency = 1 else t.Transparency = .5 end
  175. t.TopSurface = "Smooth"
  176. t.BottomSurface = "Smooth"
  177. t.RightSurface = "Smooth"
  178. t.LeftSurface = "Smooth"
  179. t.FrontSurface = "Smooth"
  180. t.BackSurface = "Smooth"
  181. t.Color = color
  182. t.Material="Neon"
  183. if t.Name == "Head" and t:FindFirstChild("face") then
  184. t.face:Remove()
  185. elseif t.Name == "Torso" and t:FindFirstChild("roblox") then
  186. t.roblox:Remove()
  187. elseif t.Name == "HumanoidRootPart" then
  188. t:Remove()
  189. end
  190. else
  191. t:Remove()
  192. end
  193. end
  194. local trans=0
  195. c.Parent = workspace
  196. local num=omgidk
  197. game:GetService("RunService"):BindToRenderStep("omgidk"..tostring(num),0,function()trans=trans+adds
  198. 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
  199. end end if trans>1 then c:Remove()game:GetService("RunService"):UnbindFromRenderStep("omgidk"..tostring(num))end end)
  200.  
  201. end
  202. end)
Add Comment
Please, Sign In to add comment