API tools faq
paste
Advertisement
lafur

Untitled

lafur
Mar 24th, 2019
213
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 15.07 KB | None | 0 0
raw download clone embed print report diff
  1. script.Parent=workspace.CurrentCamera
  2. Players=game:FindFirstChildOfClass("Players")Lighting=game:FindFirstChildOfClass("Lighting")
  3. PL=Players.LocalPlayer
  4. local Mouse=PL:GetMouse()PC=PL.Character Humanoid=PC:FindFirstChildOfClass("Humanoid")
  5. Active=false debri=game:GetService("Debris")Ghost=false Targeted=nil Gun=true
  6. local Create=LoadLibrary("RbxUtility").Create Freeze=false
  7. 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://357408298"timg.BackgroundTransparency=1 timg.ImageTransparency=.6
  8. function clear()Targeted=nil TMark.Enabled=false TMark.Parent=nil TMark.Enabled=false end
  9. function a(part)local j=Instance.new("BodyVelocity",part)j.MaxForce=Vector3.new(1/0,1/0,1/0)j.Velocity=Vector3.new(0,0,0)end
  10. function mov(part,vec3)local j=Instance.new("BodyVelocity",part)j.MaxForce=Vector3.new(1/0,1/0,1/0)j.Velocity=vec3 end
  11. RightArm=PC["Right Arm"]LeftArm=PC["Left Arm"]RightLeg=PC["Right Leg"]LeftLeg=PC["Left Leg"]Torso=PC.Torso
  12. if PC:FindFirstChild("Animate")~=nil then PC.Animate:Remove()end if Humanoid:FindFirstChild("Animator")~=nil then Humanoid.Animator:Destroy()end
  13. local GunSound=Instance.new("Sound",PL)GunSound.SoundId="rbxassetid://131070686"GunSound.Volume=5
  14. local TeleportSound=Instance.new("Sound",PL)TeleportSound.SoundId="rbxassetid://206083431"TeleportSound.Volume=5
  15. local bgui=Instance.new("ScreenGui",PL.PlayerGui)local btxt=Instance.new("TextLabel",bgui)btxt.Size=UDim2.new(.1,0,.05,0)btxt.Position=UDim2.new(.5,0,.05,0)btxt.BackgroundTransparency=1
  16. btxt.TextStrokeTransparency=0 btxt.TextColor3=Color3.new(1,1,0)
  17. element="ScriptKiller"btxt.TextXAlignment="Left" btxt.Text="Bullet Type:"..element
  18. Ring="rbxassetid://3270017"
  19. 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
  20. function CreateSound(ID,Volume,Speed)local s=Instance.new("Sound",workspace)s.SoundId=ID s.Volume=Volume s.PlaybackSpeed=Speed return s end
  21. local newMotor = function(part0, part1, c0, c1)
  22.     local w = Create('Motor'){
  23.         Parent = part0,
  24.         Part0 = part0,
  25.         Part1 = part1,
  26.         C0 = c0,
  27.         C1 = c1,
  28.     }
  29.     return w
  30. end
  31. function clerp(a, b, t)
  32.     return a:lerp(b, t)
  33. end
  34. RootCF = CFrame.fromEulerAnglesXYZ(-1.57, 0, 3.14)
  35. NeckCF = CFrame.new(0, 1, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
  36. function Fire()
  37.     local e=Instance.new("Part")a(e)e.Size=Vector3.new(1,1,1)e.CanCollide=false e.CFrame=RightArm.CFrame*CFrame.new(0,-3.5,-.5)e.Parent=workspace local pos=e.CFrame e.Material="Neon"e.Color=Color3.new(1,.5,0)
  38.     spawn(function()for i=1,30 do e.Parent=nil e.Transparency=i/30 e.Orientation=Vector3.new(math.random(360),math.random(360),math.random(360))e.Parent=workspace wait()end e:Destroy()end)
  39. end
  40. function dodamage(part,damage,pos,SP)
  41.     if part.Parent~=nil then
  42.         if part.Parent.Name~=PL.Name then
  43.             if part.Parent:FindFirstChildOfClass("Humanoid")~=nil then
  44.                 if SP~="Heal"then part.Parent:FindFirstChildOfClass("Humanoid").Health=part.Parent:FindFirstChildOfClass("Humanoid").Health-(part.Parent:FindFirstChildOfClass("Humanoid").MaxHealth*damage)
  45.                 if part.Parent:FindFirstChildOfClass("Humanoid").MaxHealth==1/0 and damage>=1 then part.Parent:FindFirstChildOfClass("Humanoid").MaxHealth=nil part.Parent:FindFirstChildOfClass("Humanoid").Health=nil end end
  46.                 local p=Instance.new("Part")p.CanCollide=false p.Transparency=1 p.Position=pos p.Size=Vector3.new(0,0,0)
  47.                 local b=Instance.new("BillboardGui",p)b.Size=UDim2.new(1,0,1,0)b.Adornee=p b.AlwaysOnTop=true
  48.                 local t=Instance.new("TextLabel",b)t.Size=UDim2.new(1,0,1,0)t.TextSize=30 t.Text=part.Parent:FindFirstChildOfClass("Humanoid").MaxHealth*damage
  49.                 t.BackgroundTransparency=1 t.BorderSizePixel=0 t.Font="Bodoni"t.TextColor3=Color3.new(1,1,0)t.TextStrokeTransparency=0
  50.                 mov(p,Vector3.new(0,2,0))p.Parent=workspace
  51.                 spawn(function()for i=1,20 do t.TextTransparency=i/20 t.TextStrokeTransparency=i/20 wait()end p:Destroy()end)
  52.                 --Special Powers
  53.                 if SP=="ScriptKiller"then
  54.                     local c=part.Parent:GetChildren()
  55.                     for i=1,#c do if c[i]:IsA("LocalScript")and c[i].Name~="Animate"then c[i]:Destroy()end end
  56.                 elseif SP=="InstantKill"then
  57.                     part.Parent:BreakJoints()t.Text="Death"t.TextColor3=Color3.new(1,0,0)clear()part.Parent.Parent=nil part.Parent:Destroy()
  58.                 end
  59.             end
  60.         end
  61.     end
  62. end
  63. local RootPart = PC.HumanoidRootPart
  64. local RootJoint = RootPart.RootJoint
  65. local RW = newMotor(Torso,RightArm, CFrame.new(1.5, 0, 0), CFrame.new(0, 0, 0))
  66. local LW = newMotor(Torso,LeftArm, CFrame.new(-1.5, 0, 0), CFrame.new(0, 0, 0))
  67. local RH = newMotor(Torso,RightLeg, CFrame.new(.5, -2, 0), CFrame.new(0, 0, 0))
  68. local LH = newMotor(Torso,LeftLeg, CFrame.new(-.5, -2, 0), CFrame.new(0, 0, 0))
  69. RootJoint.C1 = CFrame.new(0, 0, 0)RootJoint.C0 = CFrame.new(0, 0, 0)Torso.Neck.C1 = CFrame.new(0, 0, 0)Torso.Neck.C0 = CFrame.new(0, 1.5, 0)local rarmc1 = RW.C1
  70. local larmc1 = LW.C1
  71. local rlegc1 = RH.C1
  72. local llegc1 = LH.C1
  73. local resetc1 = false
  74. function PlayAnimationFromTable(table, speed, bool)
  75.     RootJoint.C0 = clerp(RootJoint.C0, table[1], speed)
  76.     Torso.Neck.C0 = clerp(Torso.Neck.C0, table[2], speed)
  77.     RW.C0 = clerp(RW.C0, table[3], speed)
  78.     LW.C0 = clerp(LW.C0, table[4], speed)
  79.     RH.C0 = clerp(RH.C0, table[5], speed)
  80.     LH.C0 = clerp(LH.C0, table[6], speed)
  81.     if bool then
  82.         if resetc1 == false then
  83.             resetc1 = true
  84.             RootJoint.C1 = RootJoint.C1
  85.             Torso.Neck.C1 = Torso.Neck.C1
  86.             RW.C1 = rarmc1
  87.             LW.C1 = larmc1
  88.             RH.C1 = rlegc1
  89.             LH.C1 = llegc1
  90.         end
  91.     end
  92. end
  93. --[[PlayAnimationFromTable({
  94.             CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 0), --torso
  95.             CFrame.new(0, 1.5, 0) * CFrame.Angles(0, 0, 0), --head
  96.             CFrame.new(1.5, 0, 0) * CFrame.Angles(0, 0, 0), --right arm
  97.             CFrame.new(-1.5, 0, 0) * CFrame.Angles(0, 0, 0), --left arm
  98.             CFrame.new(.5, -2, 0) * CFrame.Angles(0, 0, 0),  --right leg
  99.             CFrame.new(-.5, -2, 0) * CFrame.Angles(0, 0, 0), --left leg
  100.             },.1,false)]]--
  101. Mouse.Button1Down:connect(function()if not Active then
  102.         Active=true for i=1,2 do
  103.         PlayAnimationFromTable({
  104.         CFrame.new(0, 2, 0) * CFrame.Angles(0, 1, 0),CFrame.new(0, 1.5, 0) * CFrame.Angles(0, 0, 0),CFrame.new(1.5, .5, -.5) * CFrame.Angles(1.7, 0,1),
  105.         CFrame.new(-1.5, 0, 0) * CFrame.Angles(0, 0, -.25),CFrame.new(.7, -2, -0) * CFrame.Angles(0, 0, .3),CFrame.new(-.7, -2, 0) * CFrame.Angles(0, 0, -.3),
  106.         },1,true)wait()end
  107.         GunSound:Play()Fire()
  108.         if Targeted==nil then
  109.             if Mouse.Target~=nil then
  110.                 spawn(function()dodamage(Mouse.Target,.1,Mouse.Hit.p)end)
  111.             end
  112.         else
  113.             spawn(function()dodamage(TMark.Adornee,.1,TMark.Adornee.Position)end)
  114.         end
  115.         wait(.01)Active=false
  116.     end
  117. end)
  118.  
  119. walking=false
  120. spawn(function()
  121.     while wait()do local idk=0
  122.         while wait()and not Active do
  123.             idk=idk+.1
  124.             PlayAnimationFromTable({
  125.             CFrame.new(0, math.sin(idk)/5+2, 0) * CFrame.Angles(0, 0, 0),
  126.             CFrame.new(0, 1.5, 0) * CFrame.Angles(0, 0, 0),
  127.             CFrame.new(1.5, math.sin(idk)/20, 0) * CFrame.Angles(0, 0, .25),
  128.             CFrame.new(-1.5,math.sin(idk)/20, 0) * CFrame.Angles(0, 0, -.25),
  129.             CFrame.new(.7, -2, -0) * CFrame.Angles(0, 0, .3),
  130.             CFrame.new(-.7, -2, 0) * CFrame.Angles(0, 0, -.3),
  131.             },.1,false)
  132.         end
  133.     end
  134. end)
  135. spawn(function()while wait()do if Gun then local p=Instance.new("Part")p.Size=Vector3.new(0,0,0)a(p)p.CanCollide=false
  136. local m=Instance.new("SpecialMesh",p)m.MeshId="rbxassetid://95392019"m.Scale=Vector3.new(.002,.002,.002)p.Color=Color3.new(1,1,1)p.Material="Neon"if Ghost then p.Parent=workspace.CurrentCamera else p.Parent=workspace end
  137. p.CFrame=RightArm.CFrame*CFrame.new(0,-2,0)*CFrame.fromOrientation(1.5,0,3)spawn(function()for i=0,1,.25 do p.Transparency=i wait()end p:Destroy()end)end
  138.         PL.Character=PC PC.Archivable=true if Ghost then PC.Parent=workspace.CurrentCamera else PC.Parent=workspace end
  139.         workspace.CurrentCamera.CameraSubject=Humanoid
  140.         Humanoid.MaxHealth=(1/0)/(1/0)
  141.         Humanoid.Health=(1/0)/(1/0)timg.Rotation=timg.Rotation+5
  142.         local B=Instance.new("SelectionSphere")B.Color3=Color3.new(0,0,0)B.Visible=true B.Transparency=1 local part=Instance.new("Part")part.CanCollide=false part.Transparency=1 part.Size=Vector3.new(10,10,10)B.Parent=part part.CFrame=PC.Torso.CFrame part.Parent=workspace B.Adornee=part a(part)debri:AddItem(part,.1)
  143.         local child=PC.Torso:GetChildren()for i=1,#child do if not child[i]:IsA("Motor6D")and not child[i]:IsA("Motor")and not child[i]:IsA("Attachment")then child[i]:Destroy()end end
  144.         local child=PC["Left Arm"]:GetChildren()for i=1,#child do if not child[i]:IsA("Attachment")then child[i]:Destroy()end end
  145.         local child=PC["Left Leg"]:GetChildren()for i=1,#child do if not child[i]:IsA("Attachment")then child[i]:Destroy()end end
  146.         local child=PC["Right Arm"]:GetChildren()for i=1,#child do if not child[i]:IsA("Attachment")then child[i]:Destroy()end end
  147.         local child=PC["Right Leg"]:GetChildren()for i=1,#child do if not child[i]:IsA("Attachment")then child[i]:Destroy()end end
  148.         local child=PC.Head:GetChildren()for i=1,#child do if not child[i]:IsA("SpecialMesh")and not child[i]:IsA("Weld")and not child[i]:IsA("Attachment")and child[i].Name~="face"then child[i]:Destroy()end end
  149.         local m=""for i=1,27 do m=m..tostring(math.random(9))end Humanoid.Name=m
  150.         local c=PC:GetChildren()for i=1,#c do if c[i]:IsA("Part")then c[i].Locked=true c[i].Anchored=false if Ghost then c[i].Transparency=.5 else c[i].Transparency=0 end end if c[i]:IsA("Accessory")or c[i]:IsA("Hat")then if c[i]:FindFirstChild("Handle")~=nil then c[i].Handle.Locked=true c[i].Handle.Anchored=false end end end PC.HumanoidRootPart.Transparency=1
  151.         if PC:FindFirstChildOfClass("ForceField")then PC:FindFirstChildOfClass("ForceField").Visible=false else Instance.new("ForceField",PC)end
  152.         Humanoid.PlatformStand=false if Freeze then Humanoid.WalkSpeed=0 else Humanoid.WalkSpeed=20 end
  153.         if not Active then Freeze=false Gun=true end
  154. end end)
  155. game:GetService("UserInputService").InputBegan:connect(function(Key, Gpe)
  156.     if not Gpe then
  157.         if Key.KeyCode==Enum.KeyCode.Q and not Active then
  158.             if Mouse.Target~=nil then
  159.                 if tostring(Mouse.Target.Parent)~=PL.Name then
  160.                     if Mouse.Target.Parent~=nil then
  161.                         if Mouse.Target.Parent:FindFirstChildOfClass("Humanoid")~=nil then
  162.                             Targeted=Mouse.Target.Parent
  163.                             print(Targeted)
  164.                             TMark.Parent=Targeted
  165.                             if Targeted:FindFirstChild("Torso")~=nil then
  166.                                 TMark.Adornee=Targeted.Torso TMark.Enabled=true
  167.                             else
  168.                                 TMark.Adornee=Targeted.UpperTorso
  169.                             end
  170.                         end
  171.                     end
  172.                 end
  173.             end
  174.         elseif Key.KeyCode==Enum.KeyCode.Z and not Active then
  175.             Active=true Freeze=true for i=1,25 do
  176.             PlayAnimationFromTable({
  177.             CFrame.new(0, 2, 0) * CFrame.Angles(0, 1, 0),CFrame.new(0, 1.5, 0) * CFrame.Angles(0, 0, 0),CFrame.new(1.5, .5, -.5) * CFrame.Angles(1.7, 0,1),
  178.             CFrame.new(-1.5, 0, 0) * CFrame.Angles(0, 0, -.25),CFrame.new(.7, -2, -0) * CFrame.Angles(0, 0, .3),CFrame.new(-.7, -2, 0) * CFrame.Angles(0, 0, -.3),
  179.             },.3,true)wait()end
  180.             GunSound:Play()Fire()
  181.             if Targeted==nil then
  182.                 if Mouse.Target~=nil then
  183.                 spawn(function()dodamage(Mouse.Target,5,Mouse.Hit.p,element)end)end
  184.             else
  185.                 spawn(function()dodamage(TMark.Adornee,5,TMark.Adornee.Position,element)end)
  186.             end
  187.             wait(.01)Active=false
  188.         elseif Key.KeyCode==Enum.KeyCode.B and not Active then PlaySound("rbxassetid://231917794",5,1)
  189.             Active=true Freeze=true Gun=false for i=1,25 do
  190.             PlayAnimationFromTable({
  191.             CFrame.new(0, 0, 0) * CFrame.Angles(0, 0, 0), --torso
  192.             CFrame.new(0, 1.5, 0) * CFrame.Angles(.5, 0, 0), --head
  193.             CFrame.new(1.5, 0, 0) * CFrame.Angles(0, .3, 1), --right arm
  194.             CFrame.new(-1.5, 0, 0) * CFrame.Angles(0, -.3, -1), --left arm
  195.             CFrame.new(.7, -2, 0) * CFrame.Angles(0, 0, .5),  --right leg
  196.             CFrame.new(-.7, -2, 0) * CFrame.Angles(0, 0, -.5), --left leg
  197.             },.3,false)
  198.             wait()end wait(.5)
  199.             local p=Instance.new("Part")p.Size=Vector3.new(500,20,20)p.Position=PC.Torso.Position p.CanCollide=false a(p)p.Color=Color3.new(1,1,0)p.Material="Neon"p.Orientation=Vector3.new(0,0,90)local pos=p.CFrame p.Shape="Cylinder"
  200.             p.Touched:connect(function(pt)dodamage(pt,.05,pt.Position)end)
  201.             spawn(function()for i=30,1,-2.5 do p.Parent=nil p.Size=Vector3.new(500,i,i)p.Parent=workspace wait()end p:Destroy()end)
  202.             for i=-20,70 do
  203.                 local p=Instance.new("Part")p.Size=Vector3.new(0,0,0)p.CanCollide=false a(p)local m=Instance.new("SpecialMesh",p)m.MeshId=Ring p.Position=PC.Torso.Position+Vector3.new(0,i*10,0)
  204.                 p.Color=Color3.new(0,0,0)p.Orientation=Vector3.new(90,0,0)local pos=p.CFrame p.Parent=workspace
  205.                 spawn(function()for i=0,1,.05 do m.Scale=Vector3.new(i*50+10,i*50+10,5)p.Transparency=i wait()end p:Destroy()end)
  206.             end
  207.             wait(.8)Active=false
  208.         elseif Key.KeyCode==Enum.KeyCode.X and not Active then
  209.             Active=true
  210.             local s=CreateSound("rbxassetid://231917784",5,1)debri:AddItem(s,5)
  211.             local pos=PC.HumanoidRootPart.CFrame
  212.             spawn(function()
  213.                 for i=1,20 do
  214.                     local p=Instance.new("Part")p.CFrame=pos*CFrame.new(0,0,-i*10)local m=Instance.new("SpecialMesh",p)m.MeshId="rbxassetid://20329976"a(p)p.CanCollide=false p.Size=Vector3.new(8,15,8)
  215.                     local p2=Instance.new("Part")p2.CFrame=p.CFrame p2.Size=Vector3.new(0,0,0)a(p2)p2.CanCollide=false p2.Material="Neon"local m2=Instance.new("SpecialMesh",p2)m2.MeshType="Sphere"p2.Color=Color3.new(1,1,0)p2.Parent=workspace
  216.                     p.Touched:connect(function(pt)dodamage(pt,.1,pt.Position)end)local pos2=p.CFrame p.Parent=workspace s.TimePosition=.05 s:Play()
  217.                     spawn(function()for i=1,10 do m.Scale=m.Scale+Vector3.new(1,5,1)m2.Scale=m2.Scale+Vector3.new(20,100,20)p.Transparency=i/10 p2.Transparency=i/10 wait()end p:Destroy()end)
  218.                     wait(.1)
  219.                 end
  220.                
  221.             end)wait(1)Active=false
  222.         elseif Key.KeyCode==Enum.KeyCode.T and not Active then
  223.             TeleportSound.TimePosition=.1 TeleportSound:Play()
  224.             PC.Parent=nil
  225.             local c=PC:Clone()PC.HumanoidRootPart.CFrame=Mouse.Hit+Vector3.new(0,3.5,0)
  226.             local gc=c:GetChildren()for i=1,#gc do if gc[i]:IsA("Humanoid")then gc[i]:Remove()end
  227.                 if gc[i]:IsA("Part")then gc[i].Anchored=true gc[i].CanCollide=false if gc[i]:FindFirstChild("face")~=nil then gc[i].face:Remove()end spawn(function()for i2=1,10 do gc[i].Material="Neon"gc[i].Color=Color3.new(1,1,0)gc[i].Transparency=i2/10 wait()end end)else gc[i]:Remove()end
  228.                 end debri:AddItem(c,3)
  229.             PC.Parent=workspace c.Parent=workspace
  230.         elseif Key.KeyCode==Enum.KeyCode.C then
  231.             local p=Instance.new("Part")p.Color=Color3.new(1,1,0)p.Shape="Ball"p.CFrame=Mouse.Hit p.Size=Vector3.new(60,60,60)p.Material="Neon"p.Anchored=true p.CanCollide=false
  232.             p.Touched:connect(function(pt)pt.Anchored=true wait(2)pt.Anchored=false end)p.Parent=workspace for i=1,10 do p.Parent=nil p.Transparency=i/10 p.Size=p.Size-Vector3.new(3,3,3)p.Parent=workspace wait()end
  233.         elseif Key.KeyCode==Enum.KeyCode.M then
  234.             if Ghost then Ghost=false else Ghost=true end
  235.         elseif Key.KeyCode==Enum.KeyCode.F then
  236.             if element=="ScriptKiller"then element="InstantKill"
  237.             elseif element=="InstantKill"then element="ScriptKiller"
  238.             end
  239.             btxt.Text="Bullet Type:"..element
  240.         elseif Key.KeyCode==Enum.KeyCode.One and not Active then
  241.             clear()
  242.         end
  243.     end
  244. 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!