tomonaoboys

White mesh trash gun or not

Sep 14th, 2017
542
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 15.07 KB | None | 0 0
  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://432256490"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)
Add Comment
Please, Sign In to add comment