Advertisement
tomonaoboys

Remake

Sep 12th, 2017
548
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 8.30 KB | None | 0 0
  1. --[[
  2.     REMAKE / YOU WANT WHAT ?
  3.     Created by tomonaoboys
  4.     Changed from Old Version:Targeting System, Key press, some effects
  5.     Health is broken. yeah.
  6.     and this script is not for R15.(Old Version too)
  7.     Move list (* is require Target)
  8.     Q : Target         :Target someone. Can Target R15.
  9.     F : Kill Target   *
  10.     G : Erase Target  *
  11.     C : Teleport Self
  12. --]]
  13.  
  14. local Lighting=game:FindFirstChildOfClass("Lighting")local Players=game:FindFirstChildOfClass("Players")local PL=Players.LocalPlayer
  15. debri=game:GetService("Debris")Ghost=false
  16. PC=PL.Character Phm=PC:FindFirstChildOfClass("Humanoid")
  17. PL:ClearCharacterAppearance()
  18. PC.Archivable=true Targeted=nil Mouse=PL:GetMouse()
  19. Invisible=false
  20. ring="rbxassetid://3270017"
  21. function PlaySound(ID,Volume,Speed)spawn(function()local s=Instance.new("Sound",workspace)s.SoundId=ID s.Volume=Volume s.PlaybackSpeed=Speed s:Play()s.PlayOnRemove=true wait(10)s.Volume=0 s:Remove()end)end
  22. local Tabillboard=Instance.new("BillboardGui",nil)Tabillboard.Size=UDim2.new(1,0,1,0)Tabillboard.ExtentsOffsetWorldSpace=Vector3.new(0,4,0)targettext=Instance.new("TextLabel",Tabillboard)targettext.Size=UDim2.new(1,0,1,0)targettext.BackgroundTransparency=1 targettext.BorderSizePixel=0 targettext.Font="Bodoni" targettext.TextColor3=Color3.fromRGB(255,0,0)targettext.TextSize=20 targettext.TextStrokeTransparency=0 Tabillboard.AlwaysOnTop=true targettext.Text=""
  23. local namebillboard=Instance.new("BillboardGui",PC["Head"])namebillboard.Size=UDim2.new(1,0,1,0)namebillboard.ExtentsOffsetWorldSpace=Vector3.new(0,4,0)nametext=Instance.new("TextLabel",namebillboard)nametext.Size=UDim2.new(1,0,1,0)nametext.BackgroundTransparency=1 nametext.BorderSizePixel=0 nametext.Font="Bodoni" nametext.TextColor3=Color3.fromRGB(120,0,0)nametext.TextSize=30 nametext.TextStrokeTransparency=0 namebillboard.AlwaysOnTop=true nametext.Text=tostring(PL)namebillboard.Name=" billboard"namebillboard.Enabled=false
  24. local TMark=Instance.new("BillboardGui",nil)TMark.AlwaysOnTop=true TMark.Size=UDim2.new(8,0,8,0)local timg=Instance.new("ImageLabel",TMark)timg.Size=UDim2.new(1,0,1,0)timg.Image="rbxassetid://418573253"timg.BackgroundTransparency=1 timg.ImageTransparency=.6
  25. function clear()Targeted=nil TMark.Enabled=false TMark.Parent=nil TMark.Enabled=false Tabillboard.Parent=nil Tabillboard.Enabled=false end
  26. function a(part)
  27.     local j=Instance.new("BodyVelocity",part)j.MaxForce=Vector3.new(1/0,1/0,1/0)j.Velocity=Vector3.new(0,0,0)
  28. end
  29. function mov(part,vec3)
  30.     local j=Instance.new("BodyVelocity",part)j.MaxForce=Vector3.new(1/0,1/0,1/0)j.Velocity=vec3
  31. end
  32. spawn(function()
  33.     while wait()do
  34.         if PC:FindFirstChildOfClass("ForceField")then PC:FindFirstChildOfClass("ForceField").Visible=false else Instance.new("ForceField",PC)end
  35.         Phm.MaxHealth=(1/0)/(1/0)Phm.HealthDisplayType="AlwaysOff"Phm.Health=(1/0)/(1/0)Phm.WalkSpeed=8 Phm.PlatformStand=false
  36.         if Ghost then PC.Parent=workspace.CurrentCamera else PC.Parent=workspace end
  37.         local cl=PC:Clone()
  38.         local c=cl:GetChildren()timg.Rotation=timg.Rotation+3
  39.         nametext.Position=UDim2.new(0,math.random(5)-math.random(5),0,math.random(5)-math.random(5))
  40.         local B=Instance.new("SelectionSphere")B.Color3=Color3.fromRGB(60,0,0)B.Visible=true B.Transparency=0.5 local part=Instance.new("Part")part.CanCollide=false part.Transparency=1 part.Size=Vector3.new(7,7,7)B.Parent=part part.CFrame=PC.Torso.CFrame part.Parent=workspace if Invisible==false then B.Adornee=part end part.Anchored=true debri:AddItem(part,.1)
  41.         for i=1,#c do if c[i]:IsA("Humanoid")then c[i]:Destroy()end if c[i]:IsA("Part")then c[i].CanCollide=false c[i].Anchored=true if c[i].Name~="HumanoidRootPart"then c[i].Color=Color3.new(0,0,0)c[i].Transparency=.5 c[i].Material="Neon"else c[i]:Destroy()end if c[i].Name=="Head"then c[i][" billboard"].Enabled=true end end end debri:AddItem(cl,.1)cl.Parent=workspace
  42.         local c=PC:GetChildren()for i=1,#c do if c[i]:IsA("Part")then c[i].Locked=true c[i].Anchored=false c[i].Transparency=1 end end
  43.         local child=PC.Torso:GetChildren()for i=1,#child do if child[i]:IsA("Motor6D")==false then child[i]:Destroy()end end
  44.         local child=PC["Left Arm"]:GetChildren()for i=1,#child do child[i]:Destroy()end
  45.         local child=PC["Left Leg"]:GetChildren()for i=1,#child do child[i]:Destroy()end
  46.         local child=PC["Right Arm"]:GetChildren()for i=1,#child do child[i]:Destroy()end
  47.         local child=PC["Right Leg"]:GetChildren()for i=1,#child do child[i]:Destroy()end
  48.         local child=PC.Head:GetChildren()for i=1,#child do if child[i]:IsA("SpecialMesh")==false then if child[i].Name~=" billboard"then child[i]:Destroy()end end end
  49.     end
  50. end)
  51. game:GetService("UserInputService").InputBegan:connect(function(Key, Gpe)
  52.     if not Gpe then
  53.         if Key.KeyCode==Enum.KeyCode.Q then
  54.             if Mouse.Target~=nil then
  55.                 if tostring(Mouse.Target.Parent)~=PL.Name then
  56.                     if Mouse.Target.Parent~=nil then
  57.                         if Mouse.Target.Parent:FindFirstChildOfClass("Humanoid")~=nil then
  58.                             Tabillboard.Enabled=true
  59.                             Targeted=Mouse.Target.Parent
  60.                             print(Targeted)
  61.                             Tabillboard.Parent=Targeted TMark.Parent=Targeted
  62.                             if Targeted:FindFirstChild("Torso")~=nil then
  63.                             Tabillboard.Adornee=Targeted.Torso
  64.                             TMark.Adornee=Targeted.Torso TMark.Enabled=true
  65.                             targettext.Text="Targeted:"..tostring(Targeted)
  66.                             else
  67.                                 Tabillboard.Adornee=Targeted.UpperTorso
  68.                                 TMark.Adornee=Targeted.UpperTorso
  69.                                 targettext.Text="Targeted:"..tostring(Targeted)
  70.                             end
  71.                         end
  72.                     end
  73.                 end
  74.             end
  75.         elseif Key.KeyCode==Enum.KeyCode.One then
  76.             clear()
  77.         elseif Key.KeyCode==Enum.KeyCode.Zero then
  78.             if Ghost then Ghost=false print("Ghost Deactived")else Ghost=true print("Ghost Actived")end
  79.         elseif Key.KeyCode==Enum.KeyCode.F then
  80.             if Targeted~=nil then
  81.                 PlaySound("rbxassetid://130779009",5,1)
  82.                 Targeted:FindFirstChildOfClass("Humanoid").Health=nil Targeted:FindFirstChildOfClass("Humanoid").MaxHealth=nil Targeted:BreakJoints()local pos=nil
  83.                 if Targeted:FindFirstChild("Torso")~=nil then pos=Targeted.Torso.Position else pos=Targeted.UpperTorso.Position end
  84.                 local p1=Instance.new("Part")p1.Anchored=true p1.Material="Neon"p1.CanCollide=false local m=Instance.new("SpecialMesh",p1)m.MeshType="Sphere"p1.Color=Color3.new(1,0,0)p1.Size=Vector3.new(0,0,0)
  85.                 local p2=p1:Clone()local m2=p2["Mesh"]m2.MeshId=ring
  86.                 for i=0,1,.05 do
  87.                     p1.Parent=nil p2.Parent=nil p1.Position=pos p2.Position=pos p1.Transparency=i p2.Transparency=i p2.Orientation=Vector3.new(90,0,0)
  88.                     m.Scale=Vector3.new(200-i*50,200-i*50,200-i*50)
  89.                     m2.Scale=Vector3.new(16+i*5,16+i*5,10+i*5)
  90.                     p1.Parent=workspace p2.Parent=workspace wait()
  91.                 end p1:Destroy()p2:Destroy()
  92.             end
  93.         elseif Key.KeyCode==Enum.KeyCode.G then
  94.             if Targeted~=nil then
  95.                 PlaySound("rbxassetid://130779009",5,1)
  96.                 Targeted:FindFirstChildOfClass("Humanoid").Health=nil Targeted:FindFirstChildOfClass("Humanoid").MaxHealth=nil Targeted:BreakJoints()local pos=nil
  97.                 if Targeted:FindFirstChild("Torso")~=nil then pos=Targeted.Torso.Position else pos=Targeted.UpperTorso.Position end
  98.                 local OT=Targeted clear()OT:Remove()
  99.                 local p1=Instance.new("Part")p1.Anchored=true p1.Material="Neon"p1.CanCollide=false local m=Instance.new("SpecialMesh",p1)m.MeshType="Sphere"p1.Color=Color3.new(.3,0,.5)p1.Size=Vector3.new(0,0,0)
  100.                 local p2=p1:Clone()local m2=p2["Mesh"]m2.MeshId=ring p2.Color=Color3.new(1,1,1)
  101.                 for i=0,1,.05 do
  102.                     p1.Parent=nil p2.Parent=nil p1.Position=pos p2.Position=pos p1.Transparency=i p2.Transparency=i p2.Orientation=Vector3.new(90,0,0)
  103.                     m.Scale=Vector3.new(200-i*50,200-i*50,200-i*50)
  104.                     m2.Scale=Vector3.new(20-i*5,20-i*5,20-i*5)
  105.                     p1.Parent=workspace p2.Parent=workspace wait()
  106.                 end p1:Destroy()p2:Destroy()
  107.             end
  108.         elseif Key.KeyCode==Enum.KeyCode.C then
  109.             PlaySound("rbxassetid://260433746",5,1)
  110.             local part2=Instance.new("Part",workspace)part2.Shape="Ball"part2.Size=Vector3.new(10,10,10)part2.CanCollide=false part2.Anchored=true part2.Material="Neon"part2.CFrame=PC.Torso.CFrame part2.Color=Color3.new(1,1,1)
  111.             PC.Torso.CFrame=Mouse.Hit+Vector3.new(0,3,0)
  112.             local part=Instance.new("Part",workspace)part.Color=Color3.new(1,1,1)part.Shape="Ball"part.Size=Vector3.new(10,10,10)part.CanCollide=false part.Anchored=true part.Material="Neon"part.CFrame=Mouse.Hit+Vector3.new(0,3,0)
  113.             for i=0,1,.02 do part.Transparency=i part2.Transparency=i wait(.02)end
  114.             part:Destroy()part2:Destroy()
  115.         end
  116.     end
  117. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement