local plr = owner
local char = plr.Character
local hum = char:FindFirstChildOfClass("Humanoid")
local torso = char:FindFirstChild("Torso") or char:FindFirstChild("HumanoidRootPart")
local tool = Tool0
local handle = Part1
Tool0 = Instance.new("Tool")
Part1 = Instance.new("Part")
SpecialMesh3 = Instance.new("SpecialMesh")
Tool0.Name = "Flash Bang"
Tool0.CanBeDropped = false
Tool0.Parent = plr:FindFirstChild("Backpack")
Part1.Name = "Handle"
Part1.Parent = Tool0
Part1.Size = Vector3.new(0.7, 1.56, 0.65)
Part1.BottomSurface = Enum.SurfaceType.Smooth
Part1.Anchored = false
Part1.CanCollide = false
Part1.Material = Enum.Material.SmoothPlastic
Part1.TopSurface = Enum.SurfaceType.Smooth
Part1.CustomPhysicalProperties = PhysicalProperties.new(0.699999988, 1.5, 0.5, 2, 1)
SpecialMesh3.Parent = Part1
SpecialMesh3.MeshId = "rbxassetid://454819719"
SpecialMesh3.Scale = Vector3.new(0.002, 0.002, 0.002)
SpecialMesh3.TextureId = "rbxassetid://454819722"
SpecialMesh3.MeshType = Enum.MeshType.FileMesh
local plr = Tool0.Parent.Parent
local char = plr.Character
local hum = char:FindFirstChildOfClass("Humanoid")
local torso = char['Torso'] or char['UpperTorso']
local tool = Tool0
local handle = Part1
local debris = game:GetService("Debris")
local tween = game:GetService("TweenService")
local using = false
local equipped = false
local holding = false
local amount = 1/0
local junk = script
local hits = {1543854566,1543854764,1543854943,1543855404}
local explosions = {2814354886,2814355346,2814355743,2814354338}
local ls = [[
local plr = game:GetService("Players").LocalPlayer
local char = plr.Character
local ScreenGui0 = Instance.new("ScreenGui")
ScreenGui0.DisplayOrder = 10
ScreenGui0.IgnoreGuiInset = true
local Frame1 = Instance.new("Frame")
ScreenGui0.Parent = script.Parent.Parent:FindFirstChildOfClass("PlayerGui")
local flashed = Instance.new("Sound")
flashed.Parent = ScreenGui0
flashed.Looped = true
flashed.Volume = 2
flashed.SoundId = 'rbxassetid://9069161602'
flashed:Play()
ScreenGui0.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
Frame1.Parent = ScreenGui0
Frame1.Size = UDim2.new(1, 0, 1, 0)
Frame1.BackgroundColor = BrickColor.new("Institutional white")
Frame1.BackgroundColor3 = Color3.new(1, 1, 1)
Frame1.ZIndex = 2
local power = 0
local pos = script:WaitForChild('pos').Value
local t = 5
local t2 = 2
local camera = workspace.CurrentCamera
local distance = pos-camera.CFrame.Position
local direction = distance/distance.Magnitude
power = direction:Dot(camera.CFrame.LookVector)
local max_dist = 150
local multiplier = math.clamp(distance.Magnitude,0,max_dist)/max_dist
multiplier = 1-multiplier
if 0 > power then
power = math.abs(power)
t = (1-power)*(5*multiplier)
t2 = (1-power)*(2*multiplier)
else
t = (5*multiplier)
t2 = (2*multiplier)
end
local ViewportFrame = Instance.new("ViewportFrame", ScreenGui0)
ViewportFrame.Size = UDim2.new(1, 0, 1, 0)
ViewportFrame.BackgroundTransparency = 1
ViewportFrame.ImageTransparency = 0.2
local ViewportCamera = Instance.new("Camera", ViewportFrame)
ViewportFrame.CurrentCamera = ViewportCamera
ViewportCamera.CFrame = workspace.CurrentCamera.CFrame
for i,v in pairs(workspace:GetChildren()) do
if (v.ClassName == "Part" or v.ClassName == "MeshPart" or v.ClassName == "Model" or v.ClassName == "Folder") and not script:IsDescendantOf(v) and v ~= char then
v.Archivable = true
local vclone = v:Clone()
for i,m in pairs(vclone:GetDescendants()) do
if m:IsA("ScreenGui") then
m:Destroy()
end
m.Name = ' '
end
vclone.Parent = ViewportFrame
if vclone:findFirstChildOfClass("Script") then
vclone:findFirstChildOfClass("Script").Disabled = true
end
if vclone:findFirstChildOfClass("LocalScript") then
vclone:findFirstChildOfClass("LocalScript").Disabled = true
end
end
end
spawn(function()
wait(t2)
game:GetService("TweenService"):Create(flashed,TweenInfo.new(t),{Volume = 0}):Play()
game:GetService("TweenService"):Create(Frame1,TweenInfo.new(t),{BackgroundTransparency = 1}):Play()
wait(t/4)
game:GetService("TweenService"):Create(ViewportFrame,TweenInfo.new(t),{ImageTransparency = 1}):Play()
end)
game:GetService("Debris"):AddItem(ViewportFrame,t+1)
game:GetService("Debris"):AddItem(ScreenGui0,t*2)
]]
function play(id,par,vol,pitch,loop,starting,ending)
local current = Instance.new("Sound",par)
current.SoundId = "rbxassetid://" ..id
current.Parent = par or script
current.Volume = vol or 1
current.PlaybackSpeed = pitch or 1
current.Looped = loop or false
current:Play()
current.TimePosition = starting or 0
spawn(function()
if ending ~= nil and tonumber(ending) then
repeat wait() until current.TimePositon >= ending
current:Stop()
debris:AddItem(current,1)
else
repeat wait() until not current.IsPlaying
debris:AddItem(current,1)
end
end)
return current
end
function effect(par,p)
local cval = Instance.new("ObjectValue")
cval.Name = 'flashed'
cval.Parent = par
game:GetService("Debris"):AddItem(cval,0.2)
for i,v in pairs(game:GetService("Players"):GetChildren()) do
if v.Name == par.Name then
local s = NLS(ls,v:FindFirstChild("Backpack"))
local bval = Instance.new("Vector3Value")
bval.Name = 'pos'
bval.Value = p
bval.Parent = s
end
end
end
function bang(par,pos)
local Part0 = Instance.new("Part")
Part0.Name = "grenade"
Part0.Parent = par
Part0.Position = pos
Part0.Transparency = 1
Part0.Size = Vector3.new(4, 0.0500000007, 4)
Part0.Anchored = true
Part0.BottomSurface = Enum.SurfaceType.Smooth
Part0.CanCollide = false
Part0.Locked = true
Part0.TopSurface = Enum.SurfaceType.Smooth
play(explosions[math.random(1,#explosions)],Part0,1)
local s = 150
local hitbox = Instance.new("Part",Part0)
hitbox.Name = "hit box"
hitbox.Size = Vector3.new(s,s,s)
hitbox.CanCollide = false
hitbox.Anchored = true
hitbox.Transparency = 1
hitbox.Position = pos
--local reg = Region3.new(hitbox.Position-hitbox.Size/2,hitbox.Position+hitbox.Size/2)
--local parts = workspace:FindPartsInRegion3(reg,hitbox,1/0)
--for _,obj in pairs(parts) do
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
local targchar,tarhum,targtorso,targhead
pcall(function()
targchar = v.Character --obj.Parent
end)
pcall(function()
tarhum = targchar:FindFirstChildOfClass("Humanoid")
end)
pcall(function()
targtorso = targchar:FindFirstChild("HumanoidRootPart") or targchar:FindFirstChild("Torso")
end)
pcall(function()
targhead = targchar:FindFirstChild("Head")
end)
if targchar and tarhum and tarhum.Parent and targtorso and targtorso.Parent and targhead then
local p1 = pos+Vector3.new(0,1,0)
local p2 = (targhead.Position-p1)
local chars = {}
for i,vv in pairs(workspace:GetChildren()) do
local targchar2,tarhum2,targtorso2
pcall(function()
targchar2 = vv --obj.Parent
end)
pcall(function()
tarhum2 = targchar2:FindFirstChildOfClass("Humanoid")
end)
pcall(function()
targtorso2 = targchar2:FindFirstChild("HumanoidRootPart") or targchar2:FindFirstChild("Torso")
end)
if targchar2 and tarhum2 and tarhum2.Parent and targtorso2 and targtorso2.Parent then
table.insert(chars,targchar2)
end
end
local params = RaycastParams.new()
params.IgnoreWater = true
params.FilterType = Enum.RaycastFilterType.Exclude
params.FilterDescendantsInstances = {script,Part0,targchar,unpack(chars),junk}
local blocked = false
local hit = workspace:Raycast(
p1,
p2.Unit*p2.Magnitude,
params
)
if hit and 0.5 > hit.Instance.Transparency then
blocked = true
end
if not targchar:FindFirstChild("flashed") and targchar:IsA("Model") and not blocked then
effect(targchar,hitbox.Position)
end
end
end
local light = Instance.new("PointLight")
light.Brightness = 40
light.Range = s/2
light.Shadows = true
light.Parent = Part0
game:GetService("TweenService"):Create(light,TweenInfo.new(0.25),{Brightness = 0}):Play()
spawn(function()
wait(0.25)
debris:AddItem(Part0,5)
hitbox:Destroy()
end)
end
function throw(mpos)
local pag = Instance.new("Part")
pag.Parent = junk
pag.CanCollide = false
pag.Transparency = 1
pag.Anchored = true
pag.CanCollide = false
pag.CFrame = CFrame.new(handle.Position,mpos)
--play('2552682980',torso,1)
play('711753382',handle,1)
local fake = handle:Clone()
fake.Parent = junk
fake.Name = "grenade"
fake.CanCollide = true
fake.Velocity = pag.CFrame.lookVector * 130
local hit = Instance.new("Sound")
hit.SoundId = "rbxassetid://" .. tostring(hits[math.random(1,#hits)])
hit.Parent = fake
hit.Volume = 1
local bouncing = false
local activated = false
fake.Touched:Connect(function(obj)
if obj and not bouncing then
bouncing = true
hit.SoundId = "rbxassetid://2552417180"-- .. tostring(hits[math.random(1,#hits)])
hit:Play()
spawn(function()
wait(.1)
bouncing = false
end)
if not activated then
activated = true
spawn(function()
wait(1.5)
bang(junk,fake.Position)
fake:Destroy()
pag:Destroy()
end)
end
end
end)
end
tool.Equipped:Connect(function()
equipped = true
end)
tool.Unequipped:Connect(function()
equipped = false
end)
local remote = script:FindFirstChild('RemoteEvent') or Instance.new("RemoteEvent")
remote.Parent = plr:FindFirstChildOfClass("Backpack")
remote.OnServerEvent:Connect(function(lplr,data)
if plr == lplr and data then else return end
if equipped and not using then
using = true
throw(data)
amount -= 1
if 0 >= amount then
tool:Destroy()
end
wait(0.25)
using = false
end
end)
NLS([[
local mouse = game:GetService("Players").LocalPlayer:GetMouse()
local remote = script.Parent
mouse.Button1Down:Connect(function()
remote:FireServer(mouse.Hit.p)
end)
]],remote)
