pistol

--Converted with ttyyuu12345's model to script plugin v4
function sandbox(var,func)
	local env = getfenv(func)
	local newenv = setmetatable({},{
		__index = function(self,k)
			if k=="script" then
				return var
			else
				return env[k]
			end
		end,
	})
	setfenv(func,newenv)
	return func
end
cors = {}
mas = Instance.new("Model",game:GetService("Lighting"))
Tool0 = Instance.new("Tool")
Script1 = Instance.new("Script")
LocalScript2 = Instance.new("LocalScript")
Part3 = Instance.new("Part")
SpecialMesh4 = Instance.new("SpecialMesh")
Sound5 = Instance.new("Sound")
Sound6 = Instance.new("Sound")
Vector3Value7 = Instance.new("Vector3Value")
IntValue8 = Instance.new("IntValue")
BoolValue9 = Instance.new("BoolValue")
IntValue10 = Instance.new("IntValue")
BoolValue11 = Instance.new("BoolValue")
Animation12 = Instance.new("Animation")
BoolValue13 = Instance.new("BoolValue")
ScreenGui14 = Instance.new("ScreenGui")
Frame15 = Instance.new("Frame")
Frame16 = Instance.new("Frame")
Frame17 = Instance.new("Frame")
ImageLabel18 = Instance.new("ImageLabel")
ImageLabel19 = Instance.new("ImageLabel")
Frame20 = Instance.new("Frame")
ImageLabel21 = Instance.new("ImageLabel")
ImageLabel22 = Instance.new("ImageLabel")
ImageLabel23 = Instance.new("ImageLabel")
Frame24 = Instance.new("Frame")
Frame25 = Instance.new("Frame")
ImageLabel26 = Instance.new("ImageLabel")
ImageLabel27 = Instance.new("ImageLabel")
Frame28 = Instance.new("Frame")
ImageLabel29 = Instance.new("ImageLabel")
ImageLabel30 = Instance.new("ImageLabel")
Animation31 = Instance.new("Animation")
Animation32 = Instance.new("Animation")
SpecialMesh33 = Instance.new("SpecialMesh")
Script34 = Instance.new("Script")
RemoteEvent35 = Instance.new("RemoteEvent")
RemoteEvent36 = Instance.new("RemoteEvent")
Camera37 = Instance.new("Camera")
Tool0.Name = "Luger"
Tool0.Parent = mas
Tool0.TextureId = "http://www.roblox.com/asset/?id=95356596"
Tool0.Grip = CFrame.new(0.0939477235, -0.206212491, 0.560361266, 0.837946475, -0.0272410847, 0.545072019, -0.0256806612, 0.995679021, 0.0892403126, -0.545147896, -0.0887763947, 0.833626151)
Tool0.GripForward = Vector3.new(-0.545072019, -0.0892403126, -0.833626151)
Tool0.GripPos = Vector3.new(0.0939477235, -0.206212491, 0.560361266)
Tool0.GripRight = Vector3.new(0.837946475, -0.0256806612, -0.545147896)
Tool0.GripUp = Vector3.new(-0.0272410847, 0.995679021, -0.0887763947)
Tool0.ToolTip = "Luger Pistol"
Script1.Name = "Firescript"
Script1.Parent = Tool0
table.insert(cors,sandbox(Script1,function()
-- Made by Stickmasterluke
 -- edited by fusroblox
local GoreOn=true
function WaitForChild(parent,child)
	while not parent:FindFirstChild(child) do print("2waiting for " .. child) wait() end
	return parent[child]
end
local GLib = require(206209239)

local GunObject = {
	Tool = script.Parent,
	Handle = WaitForChild(script.Parent,'Handle'),
	check = true,

	GunDamage = 20, -- Base output damage per shot.
	FireRate = .2, -- How often the weapon can fire.
	Automatic = false, -- hold down to continue firing
	Range = 250, -- Max distance that the weapon can fire.
	Spread = 1, -- The bigger the spread, the more inaccurate the shots will be.
	ClipSize = 8, -- Shots in a clip
	ReloadTime = 3, -- Time it takes to reload the tool.
	StartingClips = 10, -- If you want infinit clips, remove the IntValue named "Clips" from the tool.
	SegmentLength = 40, -- How long the shot segments are, or the speed of the shot.
	FadeDelayTime = 1/60,


	BarrelPos = CFrame.new(0, 0, - 1.2), -- L, F, U
	Rate = 1/30,
	--local Colors = {BrickColor.new("Bright red"), BrickColor.new("Really red"), BrickColor.new("Dusty Rose"), BrickColor.new("Medium red")}
	Colors = {BrickColor.new("Bright yellow"),BrickColor.new("Mid gray"), BrickColor.new("Medium stone grey"), BrickColor.new("Dark stone grey")},
	FlashColors = {"Medium red", "Dusty Rose", "Bright red", "Really red"},

	Reloading = false,
	Debris = game:GetService("Debris"),
	Ammo,
	Clips,
	LaserObj,
	SparkEffect,
	ShellPart,
	--tool children
	DownVal=WaitForChild(script.Parent, 'Down'),
	AimVal=WaitForChild(script.Parent, 'Aim'),
	ReloadingVal=WaitForChild(script.Parent, 'Reloading'),
	DoFireAni = WaitForChild(script.Parent,'DoFireAni'),

	--handlechildren
	Fire,

}

--[[Member functions]]

function GunObject:Initialize()

	self.Fire=WaitForChild(self.Handle, 'Fire')

	self.Ammo = self.Tool:FindFirstChild("Ammo")
	if self.Ammo ~= nil then
		self.Ammo.Value = self.ClipSize
	end
	self.Clips = self.Tool:FindFirstChild("Clips")
	if self.Clips ~= nil then
		self.Clips.Value = self.StartingClips
	end
	self.Tool.Equipped:connect(function()
		self.Tool.Handle.Fire:Stop()
		self.Tool.Handle.Reload:Stop()
	end)
	self.Tool.Unequipped:connect(function()
		self.Tool.Handle.Fire:Stop()
		self.Tool.Handle.Reload:Stop()
	end)
	self.LaserObj = Instance.new("Part")
	self.LaserObj.Name = "Bullet"
	self.LaserObj.Anchored = true
	self.LaserObj.CanCollide = false
	self.LaserObj.Shape = "Block"
	self.LaserObj.formFactor = "Custom"
	self.LaserObj.Material = Enum.Material.Plastic
	self.LaserObj.Locked = true
	self.LaserObj.TopSurface = 0
	self.LaserObj.BottomSurface = 0
	--local tshellmesh=WaitForChild(script.Parent,'BulletMesh'):Clone()
	--tshellmesh.Scale=Vector3.new(4,4,4)
	--tshellmesh.Parent=self.LaserObj

	local tSparkEffect = Instance.new("Part")
	tSparkEffect.Name = "Effect"
	tSparkEffect.Anchored = false
	tSparkEffect.CanCollide = false
	tSparkEffect.Shape = "Block"
	tSparkEffect.formFactor = "Custom"
	tSparkEffect.Material = Enum.Material.Plastic
	tSparkEffect.Locked = true
	tSparkEffect.TopSurface = 0
	tSparkEffect.BottomSurface = 0
	self.SparkEffect=tSparkEffect

	local tshell = Instance.new('Part')
	tshell.Name='effect'
	tshell.FormFactor='Custom'
	tshell.Size=Vector3.new(1, 0.4, 0.33)
	tshell.BrickColor=BrickColor.new('Bright yellow')
	tshellmesh=WaitForChild(script.Parent,'BulletMesh'):Clone()
	tshellmesh.Parent=tshell
	self.ShellPart = tshell

	self.DownVal.Changed:connect(function()
		while self.DownVal.Value and self.check and not self.Reloading do
			self.check = false
			local humanoid = self.Tool.Parent:FindFirstChild("Humanoid")
			local plr1 = game.Players:GetPlayerFromCharacter(self.Tool.Parent)
			if humanoid ~= nil and plr1 ~= nil then
				if humanoid.Health > 0 then
					local spos1 = (self.Tool.Handle.CFrame * self.BarrelPos).p
					delay(0, function() self:SendBullet(spos1, self.AimVal.Value, self.Spread, self.SegmentLength, self.Tool.Parent, self.Colors[1], self.GunDamage, self.FadeDelayTime) end)
				else
					self.check = true
					break
				end
			else
				self.check = true
				break
			end
			wait(self.FireRate)
			self.check = true
			if not self.Automatic then
				break
			end
		end
	end)

	self.ReloadingVal.Changed:connect(function() if self.ReloadingVal.Value then self:Reload() end end)

end



function GunObject:Reload()
	self.Reloading = true
	self.ReloadingVal.Value = true
	if self.Clips ~= nil then
		if self.Clips.Value > 0 then
			self.Clips.Value = Clips.Value - 1
		else
			self.Reloading = false
			self.ReloadingVal.Value = false
			return
		end
	end
	self.Tool.Handle.Reload:Play()
	for i = 1, self.ClipSize do
		wait(self.ReloadTime/self.ClipSize)
		self.Ammo.Value = i
	end
	self.Reloading = false
	self.Tool.Reloading.Value = false
end



function GunObject:SpawnShell()
	local tshell=self.ShellPart:Clone()
	tshell.CFrame=self.Handle.CFrame
	tshell.Parent=Workspace
	game.Debris:AddItem(tshell,2)
end

function KnockOffHats(tchar)
	for _,i in pairs(tchar:GetChildren()) do
		if i:IsA('Hat') then
			i.Parent=game.Workspace
		end
	end
end

function KnockOffTool(tchar)
	for _,i in pairs(tchar:GetChildren()) do
		if i:IsA('Tool') then
			i.Parent=game.Workspace
		end
	end
end

function GunObject:SendBullet(boltstart, targetpos, fuzzyness, SegmentLength, ignore, clr, damage, fadedelay)
	if self.Ammo.Value <=0 then return end
	self.Ammo.Value = self.Ammo.Value - 1
	self:SpawnShell()
	self.Fire.Pitch = (math.random() * .5) + .75
	self.Fire:Play()
	self.DoFireAni.Value = not self.DoFireAni.Value
	print(self.Fire.Pitch)
	local boltdist = self.Range
	local clickdist = (boltstart - targetpos).magnitude
	local targetpos = targetpos + (Vector3.new(math.random() - .5, math.random() - .5, math.random() - .5) * (clickdist/100))
	local boltvec = (targetpos - boltstart).unit
	local totalsegments = math.ceil(boltdist/SegmentLength)
	local lastpos = boltstart
	for i = 1, totalsegments do
		local newpos = (boltstart + (boltvec * (boltdist * (i/totalsegments))))
		local segvec = (newpos - lastpos).unit
		local boltlength = (newpos - lastpos).magnitude
		local bolthit, endpos = CastRay(lastpos, segvec, boltlength, ignore, false)
		DrawBeam(lastpos, endpos, clr, fadedelay, self.LaserObj)
		if bolthit ~= nil then
			local h = bolthit.Parent:FindFirstChild("Humanoid")
			if h ~= nil then
				local plr = game.Players:GetPlayerFromCharacter(self.Tool.Parent)
				if plr ~= nil then
					local creator = Instance.new("ObjectValue")
					creator.Name = "creator"
					creator.Value = plr
					creator.Parent = h
				end
				if hit.Parent:FindFirstChild("BlockShot") then
						hit.Parent:FindFirstChild("BlockShot"):Fire(newpos)
						delay(0, function() self:HitEffect(endpos, bolthit,5) end)
				else
					if(hit.Name=='Head') then
						KnockOffHats(hit.Parent)
					elseif hit.Name=='Left Leg' or hit.Name=='Right Leg' then
						h.WalkSpeed=h.WalkSpeed/1.5
					elseif hit.Name=='Left Arm' or hit.Name=='Right Arm' then
						KnockOffTool(hit.Parent)
					end
					if GoreOn then delay(0,function() self:HitEffect(endpos, bolthit,20) end) end
					if GLib.IsTeammate(GLib.GetPlayerFromPart(script), GLib.GetPlayerFromPart(h))~=true then
						GLib.TagHumanoid(GLib.GetPlayerFromPart(script), h, 1)
						h:TakeDamage(damage)
					end
				end
			else
				delay(0, function() self:HitEffect(endpos, bolthit,5) end)
			end
			break
		end
		lastpos = endpos
		wait(Rate)
	end

	if self.Ammo.Value < 1 then
		self:Reload()
	end

end



function GunObject:MakeSpark(pos,part)
	local effect=self.SparkEffect:Clone()
	effect.BrickColor = part.BrickColor
	effect.Material = part.Material
	effect.Transparency = part.Transparency
	effect.Reflectance = part.Reflectance
	effect.CFrame = CFrame.new(pos)
	effect.Parent = game.Workspace
	local effectVel = Instance.new("BodyVelocity")
	effectVel.maxForce = Vector3.new(99999, 99999, 99999)
	effectVel.velocity = Vector3.new(math.random() * 15 * SigNum(math.random( - 10, 10)), 		math.random() * 15 * SigNum(math.random( - 10, 10)), math.random() * 15 * SigNum(math.random( - 10, 10)))
	effectVel.Parent = effect
	effect.Size = Vector3.new(math.abs(effectVel.velocity.x)/30, math.abs(effectVel.velocity.y)/30, math.abs(effectVel.velocity.z)/30)
	wait()
	effectVel:Destroy()
	local effecttime = .5
	game.Debris:AddItem(effect, effecttime * 2)
	local startTime = time()
	while time() - startTime < effecttime do
		if effect ~= nil then
			effect.Transparency = (time() - startTime)/effecttime
		end
		wait()
	end
	if effect ~= nil then
		effect.Parent = nil
	end
end

function GunObject:HitEffect(pos,part,numSparks)
	for i = 0, numSparks, 1 do
		spawn(function() self:MakeSpark(pos,part) end)
	end

end

--[[/Member functions]]


--[[Static functions]]

function Round(number, decimal)
	decimal = decimal or 0
	local mult = 10^decimal
	return math.floor(number * mult + .5)/mult
end

function SigNum(num)
	if num == 0 then return 1 end
	return math.abs(num)/num
end

--this is a little bad, but shouldn't really be part of the 'class' of the gun
local Intangibles = {shock=1, bolt=1, bullet=1, plasma=1, effect=1, laser=1, handle=1, effects=1, flash=1,}
function CheckIntangible(hitObj)
	print(hitObj.Name)
	return Intangibles[(string.lower(hitObj.Name))] or hitObj.Transparency == 1
end

function CastRay(startpos, vec, length, ignore, delayifhit)
	if length > 999 then
		length = 999
	end
	hit, endpos2 = game.Workspace:FindPartOnRay(Ray.new(startpos, vec * length), ignore)
	if hit ~= nil then
		if CheckIntangible(hit) then
			if delayifhit then
				wait()
			end
			hit, endpos2 = CastRay(endpos2 + (vec * .01), vec, length - ((startpos - endpos2).magnitude), ignore, delayifhit)
		end
	end
	return hit, endpos2
end

function DrawBeam(beamstart, beamend, clr, fadedelay, templatePart)
	local dis = 2 --(beamstart - beamend).magnitude
	local tlaser=templatePart:Clone()
	tlaser.BrickColor = clr
	tlaser.Size = Vector3.new(.12, .12, dis + .2)
	tlaser.CFrame = CFrame.new((beamend+beamstart)/2, beamstart) * CFrame.new(0, 0, - dis/2)
	tlaser.Parent = game.Workspace
	game.Debris:AddItem(tlaser, fadedelay)
end

--[[/Static functions]]


GunObject:Initialize()
end))
LocalScript2.Parent = Tool0
table.insert(cors,sandbox(LocalScript2,function()
local equipped = false
local setIconCon
local Players = game:GetService'Players'
local reloadCounter = 0
Cursors = {
	"http://www.roblox.com/asset/?id=94154683", -- black
	"http://www.roblox.com/asset/?id= 94154829", -- red
	"http://www.roblox.com/asset/?id=94155503",
	"http://www.roblox.com/asset/?id=94155569"
}

local getCharacterFromPart = function(part)
	local current = part
	local character = nil
	local humanoid = nil
	while true do
		for i, child in next, current:GetChildren() do
			if child:IsA'Humanoid' then
				character = current
				humanoid = child
				break
			end
		end

		if character then
			break
		else
			current = current.Parent

			if not current or current == game then
				break
			end
		end
	end

	return character, character and Players:GetPlayerFromCharacter(character), humanoid
end

script.Parent.Equipped:connect(function(mouse)
	equipped = true
	mouse.Button1Down:connect(function() script.Parent.Input:FireServer('Mouse1', true, mouse.Hit.p, mouse.Target) end)
	mouse.Button1Up:connect(function() script.Parent.Input:FireServer('Mouse1', false, mouse.Hit.p) end)
	mouse.KeyDown:connect(function(key) script.Parent.Input:FireServer('Key', true, key) end)
	mouse.KeyUp:connect(function(key) script.Parent.Input:FireServer('Key', false, key) end)

	setIconCon = script.Parent.SetIcon.OnClientEvent:connect(function(icon)
		mouse.Icon = icon
	end)

	spawn(function()
		local reloadCounter = 0
		while equipped do
			if script.Parent.Reloading.Value then
				reloadCounter=reloadCounter+1
				if reloadCounter%20<10 then
					mouse.Icon = Cursors[3]
				else
					mouse.Icon = Cursors[4]
				end
			elseif mouse.Target and getCharacterFromPart(mouse.Target) then
				mouse.Icon = Cursors[2]
			else
				mouse.Icon = Cursors[1]
			end

			game:GetService'RunService'.RenderStepped:wait()
		end
	end)

	CAS,UIS = game:GetService'ContextActionService',game:GetService'UserInputService'
	if UIS.TouchEnabled then
		CAS:BindActionToInputTypes(
			'Luger_Reload',
			function()
				script.Parent.Input:FireServer('Key', true, 'r')
			end,
			true,
			''
		)
		CAS:SetTitle('Luger_Reload', 'Reload')
	end
	while equipped do
		script.Parent.Input:FireServer('MouseMove', mouse.Hit.p, mouse.Target)
		wait(1/20)
	end
end)
script.Parent.Unequipped:connect(function()
	equipped = false

	if setIconCon then setIconCon:disconnect() end

	if CAS then CAS:UnbindAction('Luger_Reload') end
end)
end))
Part3.Name = "Handle"
Part3.Parent = Tool0
Part3.CFrame = CFrame.new(-136.330017, 15.9392357, -17.2600117, 0, 0, -1, 0, 1, -0, 1, 0, -0)
Part3.Orientation = Vector3.new(0, -90, 0)
Part3.Position = Vector3.new(-136.330017, 15.9392357, -17.2600117)
Part3.Rotation = Vector3.new(0, -90, 0)
Part3.Color = Color3.new(0, 0.560784, 0.611765)
Part3.Size = Vector3.new(0.510000467, 1.18000245, 1.34999704)
Part3.BrickColor = BrickColor.new("Bright bluish green")
Part3.Locked = true
Part3.Material = Enum.Material.Metal
Part3.brickColor = BrickColor.new("Bright bluish green")
Part3.FormFactor = Enum.FormFactor.Custom
Part3.formFactor = Enum.FormFactor.Custom
SpecialMesh4.Parent = Part3
SpecialMesh4.MeshId = "http://www.roblox.com/asset/?id=95356090"
SpecialMesh4.Scale = Vector3.new(1.79999995, 1.79999995, 1.79999995)
SpecialMesh4.TextureId = "http://www.roblox.com/asset/?id=95387789"
SpecialMesh4.MeshType = Enum.MeshType.FileMesh
Sound5.Name = "Fire"
Sound5.Parent = Part3
Sound5.Pitch = 0.82116913795471
Sound5.PlaybackSpeed = 0.82116913795471
Sound5.SoundId = "http://www.roblox.com/asset/?id=95309366"
Sound5.Volume = 1
Sound6.Name = "Reload"
Sound6.Parent = Part3
Sound6.SoundId = "http://www.roblox.com/asset/?id=95309699"
Sound6.Volume = 1
Vector3Value7.Name = "Aim"
Vector3Value7.Parent = Tool0
Vector3Value7.Value = Vector3.new(7370.47461, -428.252258, -6819.59961)
IntValue8.Name = "Ammo"
IntValue8.Parent = Tool0
IntValue8.Value = 8
BoolValue9.Name = "Down"
BoolValue9.Parent = Tool0
IntValue10.Name = "NoClips"
IntValue10.Parent = Tool0
BoolValue11.Name = "Reloading"
BoolValue11.Parent = Tool0
Animation12.Name = "FireAni"
Animation12.Parent = Tool0
Animation12.AnimationId = "http://www.roblox.com/Asset?ID=95383980"
BoolValue13.Name = "DoFireAni"
BoolValue13.Parent = Tool0
ScreenGui14.Name = "AmmoHud"
ScreenGui14.Parent = Tool0
Frame15.Name = "Bar"
Frame15.Parent = ScreenGui14
Frame15.Position = UDim2.new(1, -200, 1, -170)
Frame15.Size = UDim2.new(0, 200, 0, 60)
Frame15.BackgroundTransparency = 1
Frame15.ClipsDescendants = true
Frame16.Name = "AmmoLeft"
Frame16.Parent = Frame15
Frame16.Position = UDim2.new(0, 10, 0, 5)
Frame16.Size = UDim2.new(0, 65, 0, 50)
Frame16.BackgroundTransparency = 1
Frame17.Name = "1"
Frame17.Parent = Frame16
Frame17.Size = UDim2.new(0, 30, 0, 40)
Frame17.BackgroundTransparency = 1
ImageLabel18.Parent = Frame17
ImageLabel18.Size = UDim2.new(1, 0, 1, 0)
ImageLabel18.BackgroundTransparency = 1
ImageLabel18.ZIndex = 2
ImageLabel18.Image = "http://www.roblox.com/asset/?id=94130434"
ImageLabel19.Name = "digit"
ImageLabel19.Parent = Frame17
ImageLabel19.Position = UDim2.new(0.0500000007, 0, 0.0500000007, 0)
ImageLabel19.Size = UDim2.new(0.899999976, 0, 0.899999976, 0)
ImageLabel19.BackgroundTransparency = 1
ImageLabel19.ZIndex = 2
ImageLabel19.Image = "http://www.roblox.com/asset/?id=94099941"
Frame20.Name = "2"
Frame20.Parent = Frame16
Frame20.Position = UDim2.new(1, -30, 0, 0)
Frame20.Size = UDim2.new(0, 30, 0, 40)
Frame20.BackgroundTransparency = 1
ImageLabel21.Parent = Frame20
ImageLabel21.Size = UDim2.new(1, 0, 1, 0)
ImageLabel21.BackgroundTransparency = 1
ImageLabel21.ZIndex = 2
ImageLabel21.Image = "http://www.roblox.com/asset/?id=94130434"
ImageLabel22.Name = "digit"
ImageLabel22.Parent = Frame20
ImageLabel22.Position = UDim2.new(0.0500000007, 0, 0.0500000007, 0)
ImageLabel22.Size = UDim2.new(0.899999976, 0, 0.899999976, 0)
ImageLabel22.BackgroundTransparency = 1
ImageLabel22.ZIndex = 2
ImageLabel22.Image = "http://www.roblox.com/asset/?id=94099941"
ImageLabel23.Name = "slash"
ImageLabel23.Parent = Frame15
ImageLabel23.Position = UDim2.new(0.5, -20, 0, 5)
ImageLabel23.Size = UDim2.new(0, 30, 0, 40)
ImageLabel23.BackgroundTransparency = 1
ImageLabel23.ZIndex = 2
ImageLabel23.Image = "http://www.roblox.com/asset/?id=94100300"
Frame24.Name = "TotalAmmo"
Frame24.Parent = Frame15
Frame24.Position = UDim2.new(0.5, 10, 0, 5)
Frame24.Size = UDim2.new(0, 65, 0, 50)
Frame24.BackgroundTransparency = 1
Frame25.Name = "1"
Frame25.Parent = Frame24
Frame25.Size = UDim2.new(0, 30, 0, 40)
Frame25.BackgroundTransparency = 1
Frame25.ClipsDescendants = true
ImageLabel26.Parent = Frame25
ImageLabel26.Size = UDim2.new(1, 0, 1, 0)
ImageLabel26.BackgroundTransparency = 1
ImageLabel26.ZIndex = 2
ImageLabel26.Image = "http://www.roblox.com/asset/?id=94130434"
ImageLabel27.Name = "digit"
ImageLabel27.Parent = Frame25
ImageLabel27.Position = UDim2.new(0.0500000007, 0, 0.0500000007, 0)
ImageLabel27.Size = UDim2.new(0.899999976, 0, 0.899999976, 0)
ImageLabel27.BackgroundTransparency = 1
ImageLabel27.ZIndex = 2
ImageLabel27.Image = "http://www.roblox.com/asset/?id=94099941"
Frame28.Name = "2"
Frame28.Parent = Frame24
Frame28.Position = UDim2.new(1, -30, 0, 0)
Frame28.Size = UDim2.new(0, 30, 0, 40)
Frame28.BackgroundTransparency = 1
ImageLabel29.Parent = Frame28
ImageLabel29.Size = UDim2.new(1, 0, 1, 0)
ImageLabel29.BackgroundTransparency = 1
ImageLabel29.ZIndex = 2
ImageLabel29.Image = "http://www.roblox.com/asset/?id=94130434"
ImageLabel30.Name = "digit"
ImageLabel30.Parent = Frame28
ImageLabel30.Position = UDim2.new(0.0500000007, 0, 0.0500000007, 0)
ImageLabel30.Size = UDim2.new(0.899999976, 0, 0.899999976, 0)
ImageLabel30.BackgroundTransparency = 1
ImageLabel30.ZIndex = 2
ImageLabel30.Image = "http://www.roblox.com/asset/?id=94099941"
Animation31.Name = "idle"
Animation31.Parent = Tool0
Animation31.AnimationId = "http://www.roblox.com/Asset?ID=95383474"
Animation32.Name = "Reload"
Animation32.Parent = Tool0
Animation32.AnimationId = "http://www.roblox.com/Asset?ID=95384819"
SpecialMesh33.Name = "BulletMesh"
SpecialMesh33.Parent = Tool0
SpecialMesh33.MeshId = "http://www.roblox.com/asset/?id=95387759"
SpecialMesh33.Scale = Vector3.new(3, 3, 3)
SpecialMesh33.TextureId = "http://www.roblox.com/asset/?id=95387789"
SpecialMesh33.MeshType = Enum.MeshType.FileMesh
Script34.Parent = Tool0
table.insert(cors,sandbox(Script34,function()
-- Made by Stickmasterluke
 -- edited by fusroblox
--[[
	Fixed by ArceusInator 2/25/2015
	- Now works with FE
	- Should no longer lock up occasionally when you shoot an NPC
	- Gibs are now properly colored + Characters now spew gory gibs just like other bricks
	- No longer teamkills
	- Now registers KOs to the site
--]]

function WaitForChild(obj, name)
	while not obj:FindFirstChild(name) do
		wait()
		--print("1waiting for " .. name)
	end
	return obj:FindFirstChild(name)
end

local function FindCharacterAncestor(subject)
	if subject and subject ~= Workspace then
		if subject:FindFirstChild('Humanoid') then
			return subject
		else
			return FindCharacterAncestor(subject.Parent)
		end
	end
	return nil
end

local Tool = script.Parent

local MouseObj = {
	Hit = CFrame.new()
}
local GunObj ={
	Reloading = "http://www.roblox.com/asset/?id=94155503",

	Cursors = {
		"http://www.roblox.com/asset/?id=94154683", -- black
		"http://www.roblox.com/asset/?id= 94154829", -- red
		"http://www.roblox.com/asset/?id=94155503",
		"http://www.roblox.com/asset/?id=94155569"
	},

	ClipSize = 8,
	Equipped = false,

	Player = nil,
	Ammo = WaitForChild(script.Parent,"Ammo"),
	Clips,
	Gui = WaitForChild(Tool,"AmmoHud"),
	NumberImages={},
	IdleAni,
	MyMouse

}

local ChestWeld
Tool.Equipped:connect(function() GunObj:OnEquipped() end)
local initialized=false

function GunObj:Initialize()
	if initialized then return end
	initialized=true
	self.Ammo.Changed:connect(function()self:UpdateGui()end)

	WaitForChild(Tool, "Reloading")
	print('got to connections!!!!! ')
	Tool.Reloading.Changed:connect(function() self:UpdateGui() end)
	Tool.Unequipped:connect(function() self:OnUnequipped() end)

	Tool.DoFireAni.Changed:connect(PlayFireAni)
	self.NumberImages['0']=94105090
	self.NumberImages['1']=94099941
	self.NumberImages['2']=94105282
	self.NumberImages['3']=94105353
	self.NumberImages['4']=94105393
	self.NumberImages['5']=94105402
	self.NumberImages['6']=94105413
	self.NumberImages['7']=94105478
	self.NumberImages['8']=94105560
	self.NumberImages['9']=94105576

	local bar=WaitForChild(self.Gui,'Bar')
	self:UpdateNumbers(self.ClipSize..'', WaitForChild(bar,'TotalAmmo'))
end

function GunObj:UpdateNumbers(data,frame)
	if string.len(data)==0 then
		data= '0'..data
	end
	if string.len(data)==1 then
		data= '0'..data
	end

	local digit=WaitForChild(WaitForChild(frame,'1'),'digit')
	if digit.Image ~='http://www.roblox.com/asset/?id='..self.NumberImages[string.sub(data,1,1)] then
		local ndigit=digit:Clone()
		ndigit.Position=UDim2.new(ndigit.Position.X.Scale,ndigit.Position.X.Offset,ndigit.Position.Y.Scale,ndigit.Position.Y.Offset-65)
		ndigit.Image='http://www.roblox.com/asset/?id='..self.NumberImages[string.sub(data,1,1)]
		ndigit.Parent=digit.Parent
		ndigit:TweenPosition(digit.Position, "Out", "Quad", .1)
		digit.Name='oldDigit'
		digit:TweenPosition(UDim2.new(digit.Position.X.Scale,digit.Position.X.Offset,digit.Position.Y.Scale,digit.Position.Y.Offset+65), "Out", "Quad", .25)
		game.Debris:AddItem(digit,1)
	end
	digit=WaitForChild(WaitForChild(frame,'2'),'digit')
	if digit.Image ~='http://www.roblox.com/asset/?id='..self.NumberImages[string.sub(data,2,2)] then
		ndigit=digit:Clone()
		ndigit.Position=UDim2.new(ndigit.Position.X.Scale,ndigit.Position.X.Offset,ndigit.Position.Y.Scale,ndigit.Position.Y.Offset-65)
		ndigit.Image='http://www.roblox.com/asset/?id='..self.NumberImages[string.sub(data,2,2)]
		ndigit.Parent=digit.Parent
		ndigit:TweenPosition(UDim2.new(digit.Position.X.Scale,digit.Position.X.Offset,digit.Position.Y.Scale,0), "Out", "Quad", .25)
		digit.Name='oldDigit'
		digit:TweenPosition(UDim2.new(digit.Position.X.Scale,digit.Position.X.Offset,digit.Position.Y.Scale,digit.Position.Y.Offset+65), "Out", "Quad", .25)
		game.Debris:AddItem(digit,1)
	end
end

function GunObj:UpdateGui()
	if self.Equipped then
		local Player = GunObj.Player
		if Player ~= nil then
			if self.Ammo == nil then
				--self.Gui.Bar.GunLabel.Text ="Futuro Heavy Pistol"
				--self.Gui.Bar.AmmoLabel.Text = ""
			else
				--self.Gui.Bar.GunLabel.Text ="Futuro Heavy Pistol"
				--self.Gui.Bar.AmmoLabel.Text = tostring(self.Ammo.Value).."/"..tostring(self.ClipSize)
				self:UpdateNumbers(tostring(self.Ammo.Value),WaitForChild(self.Gui.Bar,'AmmoLeft'))
			end
			if Tool.Reloading.Value then
				--self.Gui.Bar.AmmoLabel.Text = "Reloading"
			end
		end
	end
end

function GunObj:CursorUpdate()
	local reloadCounter=0
	while self.Equipped do
		wait(1/30)
	end
end

local InReload=false

script.Parent.Input.OnServerEvent:connect(function(client, action, ...)
	if client.Character == script.Parent.Parent then
		if action == 'Mouse1' then
			local down, hit, target = ...

			if down then
				if not Tool.Down.Value then
					Tool.Aim.Value = hit
					Tool.Down.Value = true
					while Tool.Down.Value do
						Tool.Aim.Value = hit
						wait()
					end
				end
			else
				Tool.Down.Value = false
			end

			MouseObj.Hit, MouseObj.Target = hit, target
		elseif action == 'MouseMove' then
			MouseObj.Hit, MouseObj.Target = ...
		elseif action == 'Key' then
			local down, key = ...

			if down then
				if key=='r' and not Tool.Reloading.Value and not Tool.Down.Value and GunObj.Ammo.Value ~=8 and GunObj.Ammo.Value ~=0 and not InReload then
					Tool.Reloading.Value=true
				end
			end
		end
	end
end)

function GunObj:OnEquipped()
	self:Initialize()
	self.Equipped = true
	GunObj.Player = game:GetService'Players':GetPlayerFromCharacter(Tool.Parent)
	local Player = GunObj.Player
	if Player ~= nil then
		local humanoid=WaitForChild(Player.Character,'Humanoid')
		if not self.IdleAni then
			self.IdleAni = humanoid:LoadAnimation(WaitForChild(script.Parent,'idle'))
			self.IdleAni:Play()
		end
		local plrgui = WaitForChild(Player,"PlayerGui")
		self.Gui.Parent = plrgui
		Tool.Reloading.Changed:connect(function(val)
			if self.Equipped then
				if val then
				else
				end
				local Player = GunObj.Player
				if Player ~= nil then
					local gui = WaitForChild(Player.PlayerGui, "AmmoHud")
					local humanoid=WaitForChild(Player.Character,'Humanoid')
					self:UpdateGui()
					if Tool.Reloading.Value then
						--gui.Bar.AmmoLabel.Text = "Reloading"
					end
				end
			end
		end)
		self:UpdateGui()
		Spawn(function() self:CursorUpdate() end )
	end
end

function GunObj:OnUnequipped()
	if self.IdleAni then
		self.IdleAni:Stop()
		self.IdleAni:Destroy()
		self.IdleAni=nil
	end
	self.Gui.Parent = Tool
	self.Equipped = false
	print('in unequipp')
	if ChestWeld then
		print('chestweldexists')
		ChestWeld:Destroy()
	end
	local Player = GunObj.Player
	if Player ~= nil then
		local gui = WaitForChild(Player.PlayerGui,"AmmoHud")
		--gui.Bar.GunLabel.Text = ""
		--gui.Bar.AmmoLabel.Text = ""
	end
end

function PlayFireAni()
	wait(.1)
	local aniTrack = WaitForChild(Tool.Parent,"Humanoid"):LoadAnimation(Tool.FireAni)
	aniTrack:Play(0,1,1)
end

local function weldBetween(a, b)
    local weld = Instance.new("Weld")
    weld.Part0 = a
    weld.Part1 = b
    weld.C0 = CFrame.new()
    weld.C1 = b.CFrame:inverse() * a.CFrame
    weld.Parent = a
    return weld;
end


function PlayReloadAni()
	InReload=true
	local aniTrack = WaitForChild(Tool.Parent,"Humanoid"):LoadAnimation(Tool.Reload)
	local torso=WaitForChild(Tool.Parent,'Torso')
	local oldWeld
	for _,i in pairs(WaitForChild(Tool.Parent,'Right Arm'):GetChildren()) do
		if i:IsA('Weld') and i.Part1==Tool.Handle then
			oldWeld=i
		end
	end
	if not oldWeld then
		print('What... no old weld!')
		return
	end
	ChestWeld= weldBetween(torso,Tool.Handle)
	oldWeld.Part1=nil
	aniTrack:Play(0,1,2)
	wait(4)
	oldWeld.Part1=Tool.Handle
	ChestWeld:Destroy()
	ChestWeld=nil
	InReload=false
end

Tool.Reloading.Changed:connect(function() if Tool.Reloading.Value then PlayReloadAni() end end)

end))
RemoteEvent35.Name = "Input"
RemoteEvent35.Parent = Tool0
RemoteEvent36.Name = "SetIcon"
RemoteEvent36.Parent = Tool0
Camera37.Name = "ThumbnailCamera"
Camera37.Parent = Tool0
Camera37.CFrame = CFrame.new(0.0709015876, 0.931264758, 2.04624701, 0.999557495, -0.00290121534, 0.0296054315, -0, 0.995232701, 0.0975288674, -0.0297472477, -0.0974857137, 0.994792223)
Camera37.CoordinateFrame = CFrame.new(0.0709015876, 0.931264758, 2.04624701, 0.999557495, -0.00290121534, 0.0296054315, -0, 0.995232701, 0.0975288674, -0.0297472477, -0.0974857137, 0.994792223)
Camera37.FieldOfView = 40
Camera37.Focus = CFrame.new(0.00961841643, 0.72938025, -0.0129704475, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Camera37.focus = CFrame.new(0.00961841643, 0.72938025, -0.0129704475, 1, 0, 0, 0, 1, 0, 0, 0, 1)
for i,v in pairs(mas:GetChildren()) do
	v.Parent = game:GetService("Players").LocalPlayer.Backpack
	pcall(function() v:MakeJoints() end)
end
mas:Destroy()
for i,v in pairs(cors) do
	spawn(function()
		pcall(v)
	end)
end