Some random gun

Players = game:GetService("Players")
Me = Players.KazutoShehabKirito
Char = Me.Character
necko = CFrame.new(0, 1, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
Asset = "http://www.roblox.com/asset/?id="
EffectModel = nil
MeleeDmg = 123123141
Accuracy = {Minimum = 2, Maximum = 5.5, Momentum = 2}
Selected = false
ReloadFlash = false
Attacking = false
ReloadHold = false
Reloading = false
Swinging = false
Aiming = false
ReloadOn = false
Debounce = true
Hurt = false
ModelName = "Weapon"
ToolName = "Weapon"
Icon = Asset..(58334502)

function ReNew()
        if EffectModel then
                if EffectModel.Parent ~= workspace then
                        pcall(function() EffectModel:remove() end)
                        EffectModel = Instance.new("Model",workspace)
                        EffectModel.Name = "Effects"
                end
        else
                EffectModel = Instance.new("Model",workspace)
                EffectModel.Name = "Effects"
        end
end

Ammunition = {
        MaxAmmo = 8,
        Ammo = 0,
        Ammoleft = 40,
}

Images = {
        Asset..(64291927),
        Asset..(64291941),
        Asset..(64291961),
        Asset..(64291977),
}

Sounds = {
        Fire = {Id = Asset..(2697294), Pitch = 0.92, Volume = 0.8},
        Reload = {Id = Asset..(2697295), Pitch = 1, Volume = 0.5},
        Slash = {Id = "rbxasset://sounds//swordslash.wav", Pitch = 1.2, Volume = 0.6},
        Out = {Id = "rbxasset://sounds\\clickfast.wav", Pitch = 1.4, Volume = 0.6},
        Hit = {Id = Asset..(10209590), Pitch = 1.1, Volume = 0.45},
        PartHit = {Id = "rbxasset://sounds\\metal.ogg", Pitch = 1, Volume = 0.2},
}

ContentProvider = game:GetService("ContentProvider")
for _,v in pairs(Images) do ContentProvider:Preload(v) end

V3 = Vector3.new
C3 = Color3.new
BN = BrickColor.new
CN = CFrame.new
CA = CFrame.Angles
MR = math.rad
MRA = math.random
MP = math.pi
MH = math.huge
UD = UDim2.new

function RC(Pos, Dir, Max, Ignore)
        return workspace:FindPartOnRay(Ray.new(Pos, Dir.unit * (Max or 999)), Ignore)
end

function RayC(Start, En, MaxDist, Ignore)
        return RC(Start, (En - Start), MaxDist, Ignore)
end

function ComputePos(pos1, pos2)
        return CN(pos1, V3(pos2.x, pos1.y, pos2.z))
end

function DetectSurface(pos, part)
        local surface = nil
        local pospos = part.CFrame
        local pos2 = pospos:pointToObjectSpace(pos)
        local siz = part.Size
        local shaep = part.Shape
        if shaep == Enum.PartType.Ball or shaep == Enum.PartType.Cylinder then
                surface = {"Anything", CN(pospos.p, pos)*CN(0, 0, -(pospos.p - pos).magnitude+0.12)*CA(MR(-90), 0, 0)}
        else
                if pos2.Y > ((siz.Y/2)-0.01) then
                        surface = {"Top", CA(0, 0, 0)}
                elseif pos2.Y < -((siz.Y/2)-0.01) then
                        surface = {"Bottom", CA(-MP, 0, 0)}
                elseif pos2.X > ((siz.X/2)-0.01) then
                        surface = {"Right", CA(0, 0, MR(-90))}
                elseif pos2.X < -((siz.X/2)-0.01) then
                        surface = {"Left", CA(0, 0, MR(90))}
                elseif pos2.Z > ((siz.Z/2)-0.01) then
                        surface = {"Back", CA(MR(90), 0, 0)}
                elseif pos2.Z < -((siz.Z/2)-0.01) then
                        surface = {"Front", CA(MR(-90), 0, 0)}
                end
        end
        return surface
end

function Compute(pos1, pos2)
        local pos3 = Vector3.new(pos2.x, pos1.y, pos2.z)
        return CN(pos1, pos3)
end

function waitChild(n, p)
        local c = p:findFirstChild(n)
        if c then return c end
        while true do
                c = p.ChildAdded:wait()
                if c.Name == n then return c end
        end
end

function Notime(func)
        coroutine.resume(coroutine.create(function()
                func()
        end))
end

local C3 = Color3.new
local UD = UDim2.new
local V2 = Vector2.new

Torso = waitChild("Torso", Char)
Head = waitChild("Head", Char)
Rarm = waitChild("Right Arm", Char)
Larm = waitChild("Left Arm", Char)
Rleg = waitChild("Right Leg", Char)
Lleg = waitChild("Left Leg", Char)
Neck = waitChild("Neck", Torso)
Hum = waitChild("Humanoid", Char)

RSH = waitChild("Right Shoulder", Torso)
LSH = waitChild("Left Shoulder", Torso)
RH = waitChild("Right Hip", Torso)
LH = waitChild("Left Hip", Torso)

RSH.Part0 = Torso
LSH.Part0 = Torso
RH.Part0 = Torso
LH.Part0 = Torso

local Classes = {"Frame", "ImageLabel", "ImageButton", "TextLabel", "TextButton", "TextBox"}
function Make(Class, Par, Size, Pos, Color, Trans, Border, Borderc, Txt, TxtC, Img)
        local Mk = "Frame"
        for _,v in pairs(Classes) do
                if Class == v then
                        Mk = v
                end
        end
        local g = Instance.new(Mk)
        g.Size = Size
        g.Position = Pos
        g.BackgroundColor3 = Color
        g.Transparency = Trans
        g.BorderSizePixel = Border
        g.BorderColor3 = Borderc
        if Mk == "TextButton" or Mk == "TextLabel" or Mk == "TextBox" then
                g.Text = Txt
                g.TextColor3 = TxtC
        elseif Mk == "ImageLabel" or Mk == "ImageButton" then
                g.Image = Img
        end
        g.Parent = Par
        return g
end

Gui = Me:findFirstChild("PlayerGui")
if Gui then
        for _,v in pairs(Gui:children()) do if v.Name == "Weapon GUI" then v:remove() end end
end

Screen = Instance.new("ScreenGui")
Screen.Name = "Weapon GUI"

AmmoTable = {}
AccuracyGuis = {}
lul = {
        {unit = V2(0, -1), size = V2(2, 25), offset = V2(-1, -1-25)},
        {unit = V2(1, 0), size = V2(25, 2), offset = V2(1, -1)},
        {unit = V2(0, 1), size = V2(2, 25), offset = V2(-1, -1)},
        {unit = V2(-1, 0), size = V2(25, 2), offset = V2(-1-25, -1)}
}

Main = Make("Frame", Screen, UD(0, 175, 0, 20), UD(1, -185-60, 1, -30), C3(0.25, 0.25, 0.3), 0.6, 0, C3())

for i = 1, Ammunition.MaxAmmo, 1 do
        local Fr = Make("Frame", Main, UD(0, 8, 0, 14), UD(1, -12*i, 0, -14-6), C3(0.25, 0.25, 0.3), 0.6, 0, C3())
        table.insert(AmmoTable, Fr)
end

AmmoAtm = Make("TextLabel", Main, UD(0, 0, 0, 0), UD(0, 8, 0.5, 0), C3(), 0, 0, C3(), "0", C3(1, 1, 1))
AmmoAtm.BackgroundTransparency = 1
AmmoAtm.TextXAlignment = "Left"
AmmoAtm.Font = "ArialBold"
AmmoAtm.FontSize = "Size18"

AmmoLeft = Make("TextLabel", Main, UD(0, 0, 0, 0), UD(1, -8, 0.5, 0), C3(), 0, 0, C3(), "40", C3(1, 1, 1))
AmmoLeft.BackgroundTransparency = 1
AmmoLeft.TextXAlignment = "Right"
AmmoLeft.Font = "ArialBold"
AmmoLeft.FontSize = "Size18"

ReloadGui = Make("TextLabel", Main, UD(0, 0, 0, 0), UD(1, -12, 0, -40), C3(), 1, 0, C3(), "RELOAD", C3(1, 0.25, 0.1))
ReloadGui.TextXAlignment = "Right"
ReloadGui.Font = "ArialBold"
ReloadGui.FontSize = "Size24"

for _, prop in pairs(lul) do
        local g = Make("Frame", Screen, UD(0, prop.size.x, 0, prop.size.y), UD(0.5, prop.offset.x, 0.5, prop.offset.y), C3(0.8, 0.8, 0.9), 1, 0, C3())
        table.insert(AccuracyGuis, {Gui = g, props = prop})
end

Screen.Parent = Gui

local Offset = 0.1
local Thing = 1
local Speed1 = 0.1
local Speed2 = 0
local TempAcc = 0
local AccTimesMax = 17
local AccTime = 1.25
local AccTimes = AccTimesMax
local AccOn = false
function AddInaccuracy(Acc)
        TempAcc = Acc
end
Notime(function()
        while true do
                ReNew()
                AmmoAtm.Text = Ammunition.Ammo
                AmmoLeft.Text = Ammunition.Ammoleft
                for i,v in pairs(AmmoTable) do
                        v.Transparency = 1
                end
                for i = 1, Ammunition.Ammo do
                        AmmoTable[i].Transparency = 0.6
                end
                if Ammunition.Ammo <= Ammunition.MaxAmmo/4 then ReloadFlash = true else ReloadFlash = false end
                local Speed = Torso.Velocity.magnitude
                Offset = 0
                if Speed > 1 then
                        Speed1 = Speed
                        Thing = Thing*1.2
                else
                        Speed2 = Speed
                        local lol = 1.4
                        if AccOn then lol = AccTime end
                        Thing = Thing/lol
                end
                if TempAcc ~= 0 then
                        Speed1 = TempAcc
                        Thing = TempAcc/2
                        AccOn = true
                        if TempAcc ~= 0 then
                                AccTimes = AccTimes - 1
                                if AccTimes < 1 then AccTimes = AccTimesMax Notime(function() wait(0.4) AccOn = false end) TempAcc = 0 end
                        end
                end
                if Thing < 1 then Thing = 1 elseif Thing > 14 then Thing = 14 end
                Offset = Accuracy.Minimum + ((Speed1 - Speed1/Thing)/(Speed1 - Speed1/14))*Accuracy.Maximum
                Accuracy.Momentum = Offset
                wait()
        end
end)

Notime(function()
        while true do
                if ReloadFlash then
                        if ReloadOn then
                                ReloadOn = false
                                ReloadGui.Transparency = 1
                        else
                                ReloadOn = true
                                ReloadGui.Transparency = 0
                        end
                else
                        ReloadGui.Transparency = 1
                end
                wait(0.4)
        end
end)


Add = {
        Head = function(P, Scale)
                local m = Instance.new("SpecialMesh")
                m.MeshType = "Head"
                m.Scale = Scale or V3(1, 1, 1)
                m.Parent = P
                return m
        end,
        Sphere = function(P, Scale)
                local m = Instance.new("SpecialMesh")
                m.MeshType = "Sphere"
                m.Scale = Scale or V3(1, 1, 1)
                m.Parent = P
                return m
        end,
        Wedge = function(P, Scale)
                local m = Instance.new("SpecialMesh")
                m.MeshType = "Wedge"
                m.Scale = Scale or V3(1, 1, 1)
                m.Parent = P
                return m
        end,
        Block = function(P, Scale, Bevel)
                local m = Instance.new("BlockMesh")
                m.Bevel = Bevel
                m.Scale = Scale or V3(1,1,1)
                m.Parent = P
                return m
        end
}

for _,v in pairs(Sounds) do
        ContentProvider:Preload(v.Id)
end

function PlaySound(Sound, bool)
        Pitch = Sound.Pitch
        if bool then
                Pitch = MRA((Sound.Pitch*0.75)*1000, (Sound.Pitch*1.15)*1000)/1000
        end
        local a = Instance.new("Sound")
        a.SoundId = Sound.Id
        a.Volume = Sound.Volume
        a.Pitch = Pitch
        a.Name = "FX"
        a.Parent = Torso
        a:play()
        Notime(function()
                wait(1)
                a:remove()
        end)
end

function GetParts(pos, dist)
        local parts = {}
        local function o(p)
                for _,v in pairs(p:children()) do
                        if v:IsA("BasePart") then
                                if (pos - v.Position).magnitude <= dist then
                                        table.insert(parts, {v, (pos - v.Position).magnitude, v.Anchored})
                                end
                        end
                        o(v)
                end
        end
        o(workspace)
        return parts
end

function GetHum(P)
        for _,v in pairs(P:children()) do
                if v:IsA("Humanoid") then
                        if v.Health > 0 then
                                return v
                        end
                end
        end
end

function GetGroup(Pos, Distance, Hit)
        local tab = {}
        for _,v in pairs(workspace:children()) do
                local h = GetHum(v)
                local t = v:findFirstChild("Torso")
                if h and t and v ~= Hit.Parent then
                        if (t.Position - Pos).magnitude <= Distance then
                                table.insert(tab, {h, v, (t.Position - Pos).magnitude})
                        end
                end
        end
        if Hit then
                local h = GetHum(Hit.Parent)
                if h then
                        table.insert(tab, {h, Hit.Parent, 0})
                end
        end
        return tab
end

function Part(Par, Anc, Colli, Tran, Ref, Col, Siz)
        local p = Instance.new("Part")
        p.formFactor = "Custom"
        p.TopSurface = 0
        p.BottomSurface = 0
        p.Transparency = Tran
        p.Reflectance = Ref
        p.Anchored = Anc
        p.CanCollide = Colli
        p.BrickColor = Col
        p.Size = Siz
        p.Locked = true
        p.Parent = Par
        p:BreakJoints()
        return p
end

function Weld(P0, P1, C0, C1)
        local w = Instance.new("Weld")
        w.Part0 = P0
        w.Part1 = P1
        if C0 then
                w.C0 = C0
        end
        if C1 then
                w.C1 = C1
        end
        w.Parent = P0
        return w
end

for _,v in pairs(Char:children()) do
        if v.Name == ModelName then
                v:remove()
        end
end

for _,v in pairs(Char:children()) do if v.Name == ModelName then v:remove() end end

Model = Instance.new("Model")
Model.Name = ModelName

FTorso = Part(Model, false, false, 1, 0, Torso.BrickColor, V3(2, 2, 1))
FW = Weld(Torso, FTorso)

RAB = Part(Model, false, false, 1, 0, BN("White"), V3(0.2, 0.2, 0.2))
LAB = Part(Model, false, false, 1, 0, BN("White"), V3(0.2, 0.2, 0.2))
RLB = Part(Model, false, false, 1, 0, BN("White"), V3(0.2, 0.2, 0.2))
LLB = Part(Model, false, false, 1, 0, BN("White"), V3(0.2, 0.2, 0.2))

RABW = Weld(Torso, RAB, CN(), CN(-1.5, -0.5, 0))
LABW = Weld(Torso, LAB, CN(), CN(1.5, -0.5, 0))
RLBW = Weld(Torso, RLB, CN(), CN(-0.5, 1, 0))
LLBW = Weld(Torso, LLB, CN(), CN(0.5, 1, 0))

RAW = Weld(RAB, nil, CN(), CN(0, 0.5, 0))
LAW = Weld(LAB, nil, CN(), CN(0, 0.5, 0))
RLW = Weld(RLB, nil, CN(), CN(0, 1, 0))
LLW = Weld(LLB, nil, CN(), CN(0, 1, 0))

TW = Weld(Torso, nil, CN(-0.4, -1.5, 0.7), CA(MR(55), MR(-90), MR(0)))

local FH = Instance.new("Humanoid",Model)
FH.PlatformStand = true
FH.MaxHealth = math.huge
FH.Health = math.huge

pcall(function() Torso:findFirstChild("Shirt"):clone().Parent = Model end)

local hh = Part(Model, false, false, 1, 0, BN("White"), V3(0.2, 0.2, 0.2))
hh.Name = "Head"
Weld(FTorso, hh)

Weapon = Instance.new("Model")
Weapon.Name = "Weapon"

HB = Part(Weapon, false, false, 1, 0, BN("White"), V3(0.2, 0.2, 0.2))
HBW = Weld(Rarm, HB, CN(0, -0.7, 0), CA(MR(-90), MR(180), 0))
HW = Weld(HB, nil, CA(MR(38), MR(-28), MR(-90)) * CN(0, -0.2, -3.8))

LHB = Part(Weapon, false, false, 1, 0, BN("White"), V3(0.2, 0.2, 0.2))
LHBW = Weld(Larm, LHB, CN(0, -0.7, 0), CA(MR(-90), MR(180), 0))
LHW = Weld(LHB, nil, CA(MR(-2), MR(30), MR(-3)) * CN(-0.1, 0.32, -0.24))
LHWK = Weld(LHB, nil, CA(MR(170), 0, 0))


Handle = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.5, 0.9, 0.9))
TW.Part1 = Handle

Handle2 = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.5, 0.6, 1.6))
Weld(Handle, Handle2, CA(MR(-45), 0, 0), CN(0, 0.5, -0.4))

Handle3 = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.5, 0.7, 1.3))
Weld(Handle2, Handle3, CA(MR(45), 0, 0), CN(0, -0.4, -0.9))

Pipe1 = Part(Weapon, false, false, 0, 0.1, BN("Light grey"), V3(0.3, 0.3, 3.2))
Add.Block(Pipe1, V3(1,1,1), 0.08)
Weld(Handle3, Pipe1, CN(0, 0.15, 1.6+0.55))

Pipe2 = Part(Weapon, false, false, 0, 0.1, BN("Light grey"), V3(0.3, 0.3, 1.7))
Add.Block(Pipe2, V3(1,1,1), 0.08)
Weld(Handle3, Pipe2, CN(0, -0.15, 0.85+0.55))

Pipe3 = Part(Weapon, false, false, 0, 0.1, BN("Light grey"), V3(0.25, 0.25, 1.6))
Add.Block(Pipe3, V3(1,1,1), 0.065)
Weld(Pipe2, Pipe3, CN(0, 0, 0.8+0.7))

Pump = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.45, 0.45, 1.1))
Add.Block(Pump, V3(1,1,1), 0.225/2)
PumpWeld = Weld(Pipe2, Pump, CN(0, 0, 0.6), CN(0, 0, 0))

Pump2 = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.5, 0.5, 0.3))
Add.Block(Pump, V3(1,1,1), 0.13)
Weld(Pump, Pump2, CN(0, 0, -0.5))

for degrees = -20, 200, 20 do
        local Derp = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.2, 0.2, 0.2))
        Add.Block(Derp, V3(0.4,0.6,0.4), 0.02)
        Weld(Handle3, Derp, CN(0, -0.45, -0.32) * CA(MR(degrees), 0, 0), CN(0, 0, -0.2))
end

Derp = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.2, 0.2, 0.3))
Add.Block(Derp, V3(0.4,1,1), 0.02)
Weld(Handle3, Derp, CN(0, 0, -0.32) * CA(MR(-20), 0, 0), CN(0, 0.45, -0.2))

Trigger = Part(Weapon, false, false, 0, 0, BN("Really black"), V3(0.2, 0.3, 0.2))
Add.Block(Trigger, V3(0.5, 0.9, 0.3), 0.02)
TriggerWeld = Weld(Handle3, Trigger, CN(0, -0.45, -0.4) * CA(MR(2), 0, 0))

Aim = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.3, 0.2, 0.7))
Add.Block(Aim, V3(1,0.7,1), 0.05)
Weld(Pipe1, Aim, CN(0, 0.12, 1.1))

Aim1 = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.2, 0.2, 0.2))
Add.Block(Aim1, V3(0.3, 0.7, 0.5))
Weld(Aim, Aim1, CN(-.1, 0.1, -0.25))

Aim2 = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.2, 0.2, 0.2))
Add.Block(Aim2, V3(0.3, 0.7, 0.5))
Weld(Aim, Aim2, CN(.1, 0.1, -0.25))

Aim3 = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.2, 0.2, 0.2))
Add.Block(Aim3, V3(0.3, 0.7, 0.5))
Weld(Aim, Aim3, CN(0, 0.1, 0.25))

BulletFlip = Part(Weapon, false, false, 0, 0, BN("Light grey"), V3(0.2, 0.3, 0.6))
Flip = Weld(Handle3, BulletFlip, CN(-0.18, 0.1, 0.2) * CA(0, MR(-10), 0))

---POCKET

BeltWelds = {}

BeltK = nil
for i = -0.5, 0.5, 1 do
        local Belt = Part(Weapon, false, false, 0, 0, BN("Black"), V3(2.1, 0.3, 0.2))
        table.insert(BeltWelds, Weld(Torso, Belt, CN(0, -0.9, i)))
end
for i = 1, -1, -2 do
        local Belt = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.2, 0.3, 1.1))
        table.insert(BeltWelds, Weld(Torso, Belt, CN(i, -0.9, 0)))
        BeltK = Belt
end

for i = -0.25, 0.25, 0.5 do
        local Pocket = Part(Weapon, false, false, 0, 0, BN("Black"), V3(1.1, 0.9, 0.2))
        table.insert(BeltWelds, Weld(Torso, Pocket, CN(0.8, -1.2, -0.8) * CA(0, MR(-15), 0), CN(0, 0, i)))
end

for i = -0.5, 0.5, 1 do
        local Pocket = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.6, 0.9, 0.2))
        table.insert(BeltWelds, Weld(Torso, Pocket, CN(0.8, -1.2, -0.8) * CA(0, MR(-15)+MP/2, 0), CN(0, 0, i)))
end
Pocket = Part(Weapon, false, false, 0, 0, BN("Black"), V3(1.1, 0.2, 0.6))
table.insert(BeltWelds, Weld(Torso, Pocket, CN(0.8, -1.6, -0.8) * CA(0, MR(-15), 0)))

function Shell(P)
        local Shel = Instance.new("Model")
        local Back = Part(Shel, false, false, 0, 0, BN("Bright yellow"), V3(0.3, 0.3, 0.25))
        local Main = Part(Shel, false, false, 0, 0, BN("Bright red"), V3(0.3, 0.3, 0.4))
        Add.Block(Back, V3(1,1,1), 0.077)
        Add.Block(Main, V3(1,1,1), 0.077)
        Weld(Main, Back, CN(0, 0, -0.225))
        Shel.Parent = P
        return {Model = Shel, Back = Back, Main = Main}
end

for y = 0.15, 0.65, 0.25 do
        for x = -0.12, 0.13, 0.24 do
                for z = -0.25, 0.26, 0.5 do
                        local sh = Shell(Weapon)
                        Weld(Pocket, sh.Main, CN(z-0.05, y, x), CA(0, MP/2, 0))
                end
        end
end

KnifeSheath = Part(Weapon, false, false, 0, 0, BN("Black"), V3(0.3, 0.9, 0.6))
SheathWeld = Weld(BeltK, KnifeSheath, CN(-0.2, -0.3, -0.25) * CA(MR(-20), 0, 0))

KnifeHandle = Part(Weapon, false, false, 0, 0, BN("Really black"), V3(0.3, 0.6, 0.3))
KnifeWeld = Weld(KnifeSheath, KnifeHandle, CA(MP, 0, 0), CN(0, 0.9, 0))

KnifeHandle2 = Part(Weapon, false, false, 0, 0, BN("Dark grey"), V3(0.3, 0.2, 0.4))
Weld(KnifeHandle, KnifeHandle2, CN(0, 0.35, 0))

KnifeBlade1 = Part(Weapon, false, false, 0, 0.1, BN("Light grey"), V3(0.2, 0.8, 0.3))
Add.Block(KnifeBlade1, V3(0.4, 1, 1), 0.05)
Weld(KnifeHandle2, KnifeBlade1, CN(0, 0.42, 0))

KnifeBlade2 = Part(Weapon, false, false, 0, 0.1, BN("Light grey"), V3(0.2, 0.24, 0.24))
Add.Block(KnifeBlade2, V3(0.4, 1, 1), 0.05)
Weld(KnifeBlade1, KnifeBlade2, CN(0, 0.32, 0), CA(MR(45), 0, 0))

function Show_Damage(P, D, Area)
        local mo = Instance.new("Model")
        mo.Name = D
        local p = Part(mo, true, false, 0, 0, BN("Bright red"), V3(0.2, 0.2, 0.2))
        p.Name = "Head"
        local m = Instance.new("SpecialMesh")
        m.MeshType = "Brick"
        m.Scale = Vector3.new(3.5, 2.3, 3.5)
        m.Parent = p
        local h = Instance.new("Humanoid")
        h.Health = 0
        h.MaxHealth = 0
        h.Name = "asd"
        h.Parent = mo
        local nah = true
        mo.Parent = workspace
        local cf = CN(P) * CN(MRA(-Area*100, Area*100)/100, MRA(-Area*100, Area*100)/100, MRA(-Area*100, Area*100)/100)
        p.CFrame = cf
        Notime(function()
                Notime(function()
                        for i = 0, 6, 0.03 do
                                wait()
                                p.CFrame = cf * CN(0, i, 0)
                        end
                end)
                wait(1.5)
                for i = 0, 1, 0.05 do
                        p.Transparency = i
                        if nah then mo.Name = "" nah = false else mo.Name = "- "..D nah = true end
                        wait()
                end
                mo:remove()
        end)
end

function Hit(part)
        local H = GetHum(part.Parent)
        if H and Debounce and Hurt then
                Debounce = false
                local Dmg = MRA(MeleeDmg/1.3, MeleeDmg)
                H.Health = H.Health - Dmg
                Show_Damage(KnifeBlade2.Position, Dmg, 0.1)
        end
end

KnifeBlade1.Touched:connect(Hit)
KnifeBlade2.Touched:connect(Hit)

Weapon.Parent = Model
Model.Parent = Char

if script.Parent.className ~= "HopperBin" then
        h = Instance.new("HopperBin", Me.Backpack)
        h.Name = ToolName
        script.Parent = h
end

bin = script.Parent

function Attach(t)
        RSH.Part0 = t
        LSH.Part0 = t
        RH.Part0 = t
        LH.Part0 = t
        RABW.Part0 = t
        LABW.Part0 = t
        LLBW.Part0 = t
        RLBW.Part0 = t
        for _,v in pairs(BeltWelds) do
                v.Part0 = t
        end
        if t == Torso then
                FTorso.Transparency = 1
        else
                Torso.Transparency = 1
        end
        t.Transparency = 0
end

function Normal()
        RAW.C0 = CA(MR(90), 0, MR(-65)) * CN(0.6, -0.9, 0)
        LAW.C0 = CA(MR(85), 0, MR(-40)) * CN(0.5, -0.5, 0)
        FW.C0 = CA(0, MR(-70), 0)
        HW.C0 = CA(MR(0), MR(5), MR(0)) * CN(0.4, 0, -1.2)
        LHW.C0 = CA(MR(-2), MR(30), MR(-3)) * CN(-0.1, 0.32, -0.24)
        PumpWeld.C1 = CN(0, 0, 0)
        Flip.C1 = CN(0, 0, 0)
        Attach(FTorso)
        LHW.Part1 = nil
        TW.Part1 = nil
        LHWK.Part1 = nil
        KnifeWeld.Part1 = KnifeHandle
        Neck.C0 = necko
        HW.Part1 = Handle
end

function Swing()
        Swinging = true
        for i = 0.5, 1, 0.5 do
                LAW.C0 = CA(MR(85-8*i), 0, MR(-40+5*i)) * CN(0.5, -0.5+0.2*i, 0)
                RAW.C0 = CA(MR(90-5*i), 0, MR(-65-5*i)) * CN(0.6+0.05*i, -0.9+0.05*i, -0.1*i)
                HW.C0 = CA(MR(-5*i), MR(5+5*i), MR(0)) * CN(0.4, 0, -1.2)
                FW.C0 = CA(0, MR(-70+8*i), 0)
                wait()
        end
        for i = 0.33, 1, 0.33 do
                LAW.C0 = CA(MR(77-37*i), 0, MR(-35+30*i)) * CN(0.5-0.15*i, -0.3+0.3*i, 0)
                RAW.C0 = CA(MR(85-15*i), 0, MR(-70-5*i)) * CN(0.65+0.15*i, -0.85+0.2*i, -0.1-0.2*i)
                HW.C0 = CA(MR(-5-15*i), MR(10+10*i), MR(0)) * CN(0.4, 0, -1.2)
                FW.C0 = CA(0, MR(-62+58*i), 0)
                wait()
        end
        LHWK.Part1 = KnifeHandle
        KnifeWeld.Part1 = nil
        PlaySound(Sounds.Slash)
        for i = 0.25, 1, 0.25 do
                LAW.C0 = CA(MR(40+30*i), 0, MR(-5-45*i)) * CN(0.35-0.2*i, -0.5*i, 0)
                RAW.C0 = CA(MR(70-15*i), 0, MR(-75-5*i)) * CN(0.8, -0.65+0.15*i, -0.3-0.05*i)
                HW.C0 = CA(MR(-20-10*i), MR(20+5*i), MR(0)) * CN(0.4, 0, -1.2)
                FW.C0 = CA(0, MR(-4+14*i), 0)
                LHWK.C0 = CN(0, -0.1*i, 0.2*i) * CA(MR(170), 0, MR(-50*i))
                wait()
        end
        Hurt = true
        Debounce = true
        for i = 0.25, 1, 0.25 do
                LAW.C0 = CA(MR(70+20*i), 0, MR(-50+35*i)) * CN(0.15-0.05*i, -0.5-0.3*i, 0)
                FW.C0 = CA(0, MR(10-60*i), 0)
                LHWK.C0 = CN(0, -0.1-0.05*i, 0.2+0.1*i) * CA(MR(170), 0, MR(-50-40*i))
                wait()
        end
        for i = 0.25, 1, 0.25 do
                LAW.C0 = CA(MR(90+10*i), 0, MR(-15+15*i)) * CN(0.1, -0.9, 0)
                FW.C0 = CA(0, MR(-50-40*i), 0)
                LHWK.C0 = CN(0, -0.15, 0.3) * CA(MR(170), 0, MR(-90))
                wait()
        end
        for i = 0.33, 1, 0.33 do
                LAW.C0 = CA(MR(100+3*i), 0, 0) * CN(0.1, -0.9, 0)
                FW.C0 = CA(0, MR(-90-6*i), 0)
                LHWK.C0 = CN(0, -0.15, 0.3) * CA(MR(170), 0, MR(-90))
                wait()
        end
        Hurt = false
        wait(0.04)
        for i = 0.25, 1, 0.25 do
                LAW.C0 = CA(MR(103-13*i), 0, 0) * CN(0.1, -0.9+0.1*i, 0)
                FW.C0 = CA(0, MR(-96+16*i), 0)
                LHWK.C0 = CN(0, -0.15, 0.3-0.1*i) * CA(MR(170), 0, MR(-90+15*i))
                wait()
        end
        for i = 0.25, 1, 0.25 do
                LAW.C0 = CA(MR(90-42*i), 0, 0) * CN(0.1+0.1*i, -0.8+0.3*i, 0)
                RAW.C0 = CA(MR(55+15*i), 0, MR(-80+5*i)) * CN(0.8-0.05*i, -0.5-0.1*i, -0.35+0.05*i)
                FW.C0 = CA(0, MR(-80+10*i), 0)
                HW.C0 = CA(MR(-30+20*i), MR(25-15*i), MR(0)) * CN(0.4, 0, -1.2)
                LHWK.C0 = CN(0, -0.15, 0.2-0.45*i) * CA(MR(170), 0, MR(-75+75*i))
                wait()
        end
        for i = 0.5, 1, 0.5 do
                LAW.C0 = CA(MR(48-8*i), 0, 0) * CN(0.2+0.05*i, -0.5, 0)
                RAW.C0 = CA(MR(70+10*i), 0, MR(-75+7*i)) * CN(0.75-0.05*i, -0.6-0.1*i, -0.3+0.05*i)
                FW.C0 = CA(0, MR(-70), 0)
                HW.C0 = CA(MR(-10+10*i), MR(10-5*i), MR(0)) * CN(0.4, 0, -1.2)
                LHWK.C0 = CN(0, -0.15, -0.25-0.15*i) * CA(MR(170), 0, 0)
                wait()
        end
        LHWK.Part1 = nil
        KnifeWeld.Part1 = KnifeHandle
        for i = 0.25, 1, 0.25 do
                LAW.C0 = CA(MR(40+40*i), 0, MR(-30*i)) * CN(0.25+0.2*i, -0.5, 0)
                RAW.C0 = CA(MR(80+10*i), 0, MR(-68+3*i)) * CN(0.7-0.1*i, -0.7-0.2*i, -0.25+0.2*i)
                wait()
        end
        for i = 0.5, 1, 0.5 do
                LAW.C0 = CA(MR(80+5*i), 0, MR(-30-10*i)) * CN(0.45+0.05*i, -0.5, -0.05+0.05*i)
                RAW.C0 = CA(MR(90), 0, MR(-65)) * CN(0.6, -0.9, 0)
                wait()
        end
        Normal()
        Swinging = false
end

function Reload(once)
        while Ammunition.Ammo < Ammunition.MaxAmmo and Ammunition.Ammoleft > 0 do
                wait()
                for i = 0.33, 1, 0.33 do
                        RAW.C0 = CA(MR(45-2*i), 0, MR(-15)) * CN(0, -0.15-0.05*i, 0)
                        LAW.C0 = CA(MR(50), MR(40), MR(-15)) * CN(0.5, -0.5, 0)
                        LHW.C0 = CA(MR(-35), MR(60), MR(-45)) * CN(-0.6, 0.2, -0.24)
                        wait()
                end
                for i = 0.25, 1, 0.25 do
                        RAW.C0 = CA(MR(43-8*i), 0, MR(-15)) * CN(0, -0.2-0.2*i, 0)
                        LAW.C0 = CA(MR(50), MR(40), MR(-15)) * CN(0.5, -0.5, 0)
                        LHW.C0 = CA(MR(-35), MR(60), MR(-45)) * CN(-0.6, 0.2, -0.24)
                        wait()
                end
                for i = 0.5, 1, 0.5 do
                        RAW.C0 = CA(MR(35-2*i), 0, MR(-15)) * CN(0, -0.4-0.05*i, 0)
                        wait()
                end
                local shel = Shell(Weapon)
                local w = Weld(Rarm, shel.Main, CN(0, -1.25, 0.45), CA(MR(-140), 0, MR(60)))
                for i = 0.25, 1, 0.25 do
                        RAW.C0 = CA(MR(33+20*i), 0, MR(-15-10*i)) * CN(0, -0.45+0.2*i, 0)
                        LAW.C0 = CA(MR(50-5*i), MR(40), MR(-15+5*i)) * CN(0.5, -0.5, 0)
                        w.C0 = CN(-0.1*i, -1.25, 0.45-0.25*i)
                        wait()
                end
                for i = 0.2, 1, 0.2 do
                        RAW.C0 = CA(MR(53+32*i), 0, MR(-25-12*i)) * CN(0, -0.25-0.3*i, 0)
                        LAW.C0 = CA(MR(45), MR(40), MR(-10+10*i)) * CN(0.5, -0.5+0.15*i, 0)
                        w.C0 = CN(-0.1-0.1*i, -1.25, 0.2-0.3*i)
                        w.C1 = CA(MR(-140+50*i), 0, MR(60))
                        wait()
                end
                PlaySound(Sounds.Reload, false)
                for i = 0.25, 1, 0.25 do
                        RAW.C0 = CA(MR(85+10*i), 0, MR(-42-8*i)) * CN(0, -0.55-0.1*i, 0)
                        LAW.C0 = CA(MR(45), MR(40), 0) * CN(0.5, -0.35, 0)
                        w.C0 = CN(-0.2-0.05*i, -1.25, -0.1-0.1*i)
                        wait()
                end
                shel.Model:remove() shell = nil
                Ammunition.Ammo = Ammunition.Ammo + 1
                Ammunition.Ammoleft = Ammunition.Ammoleft - 1
                wait(0.1)
                for i = 0.33, 1, 0.33 do
                        RAW.C0 = CA(MR(95-10*i), 0, MR(-50+10*i)) * CN(0, -0.65+0.1*i, 0)
                        LAW.C0 = CA(MR(45+5*i), MR(40), MR(-12*i)) * CN(0.5, -0.35-0.1*i, 0)
                        wait()
                end
                for i = 0.25, 1, 0.25 do
                        RAW.C0 = CA(MR(85-40*i), 0, MR(-40+25*i)) * CN(0, -0.55+0.4*i, 0)
                        LAW.C0 = CA(MR(50), MR(40), MR(-12-3*i)) * CN(0.5, -0.45-0.05*i, 0)
                        wait()
                end
                if once then break end
                if not ReloadHold then break end
        end
        for i = 0.33, 1, 0.33 do
                RAW.C0 = CA(MR(45+10*i), 0, MR(-15-10*i)) * CN(0.1*i, -0.15-0.1*i, 0)
                LAW.C0 = CA(MR(52+12*i), MR(40-5*i), MR(-15-5*i)) * CN(0.5, -0.5, 0)
                LHW.C0 = CA(MR(-35+10*i), MR(60-10*i), MR(-45+10*i)) * CN(-0.6+0.1*i, 0.2, -0.24)
                wait()
        end
        for i = 0.2, 1, 0.2 do
                RAW.C0 = CA(MR(55+30*i), 0, MR(-25-30*i)) * CN(0.1+0.4*i, -0.25-0.55*i, 0)
                LAW.C0 = CA(MR(70+10*i), MR(35-30*i), MR(-20-15*i)) * CN(0.5, -0.5, 0)
                LHW.C0 = CA(MR(-25+18*i), MR(50-15*i), MR(-35+25*i)) * CN(-0.5+0.3*i, 0.2+0.1*i, -0.24)
                wait()
        end
        for i = 0.25, 1, 0.25 do
                RAW.C0 = CA(MR(85+5*i), 0, MR(-55-10*i)) * CN(0.5+0.1*i, -0.8-0.1*i, 0)
                LAW.C0 = CA(MR(80+5*i), MR(5-5*i), MR(-35-5*i)) * CN(0.5, -0.5, 0)
                LHW.C0 = CA(MR(-7+5*i), MR(35-5*i), MR(-10+7*i)) * CN(-0.2+0.1*i, 0.3+0.02*i, -0.24)
                wait()
        end
end

function ReloadStart(once)
        Reloading = true
        HW.Part1 = nil
        LHW.Part1 = Pipe2
        for i = 0.25, 1, 0.25 do
                RAW.C0 = CA(MR(90-10*i), 0, MR(-65+10*i)) * CN(0.6-0.2*i, -0.9+0.15*i, 0)
                LAW.C0 = CA(MR(85-5*i), MR(7*i), MR(-40+5*i)) * CN(0.5, -0.5, 0)
                LHW.C0 = CA(MR(-2-8*i), MR(30+5*i), MR(-3-12*i)) * CN(-0.1-0.1*i, 0.32-0.12*i, -0.24)
                wait()
        end
        for i = 0.15, 1, 0.15 do
                RAW.C0 = CA(MR(80-35*i), 0, MR(-55+40*i)) * CN(0.4-0.4*i, -0.75+0.6*i, 0)
                LAW.C0 = CA(MR(80-30*i), MR(7+33*i), MR(-35+20*i)) * CN(0.5, -0.5, 0)
                LHW.C0 = CA(MR(-10-25*i), MR(35+25*i), MR(-15-30*i)) * CN(-0.2-0.4*i, 0.2, -0.24)
                wait()
        end
        Reload(once)
        Normal()
        Reloading = false
end

function AimEet()
end

function Shoot(Start, To)
        local Accu = CA(MR(MRA(-Accuracy.Momentum*1000, Accuracy.Momentum*1000)/1700),  MR(MRA(-Accuracy.Momentum*1000, Accuracy.Momentum*1000)/1000), MR(MRA(-Accuracy.Momentum*1000, Accuracy.Momentum*1000)/1000))
        for Pellets = 1, 8 do
                local Power = 20
                local Drop = 0.2
                local Face = CN(Start, To) * Accu * CA(MR(MRA(-10000, 10000)/2500), MR(MRA(-10000, 10000)/2500), MR(MRA(-10000, 10000)/2500))
                local Pellet = Part(PelletModel, true, false, 0, 0, BN("Dark grey"), V3(0.2, 0.2, 0.3))
                Pellet.CFrame = Face
                local LastPoint = Face.p
                Notime(function()
                        local HitObj
                        local HitPos
                        local DistThing = 250
                        for Distance = Power, 600, Power do
                                Face = Face * CA(MR(-Drop), 0, 0) * CN(0, 0, -Power)
                                local PointNow = Face.p
                                local Hit, Pos = RayC(LastPoint, PointNow, Power+2, EffectModel)
                                if Hit then
                                        DistThing = Distance
                                        if DistThing > 250 then DistThing = 200 end
                                        PointNow = Pos
                                        HitPos = Pos
                                        HitObj = Hit
                                end
                                local Dist = (PointNow - LastPoint).magnitude
                                Pellet.CFrame = Face
                                Drop = Drop + 0.04
                                local Effect = Part(EffectModel, true, false, 0, 0, BN("White"), V3(0.2, 0.2, 0.2))
                                Effect.CFrame = CN(LastPoint, PointNow) * CA(MR(-90), 0, 0) * CN(0, Dist/2, 0)
                                local H = Add.Head(Effect, V3(0.8, Dist*5, 0.8))
                                LastPoint = Face.p
                                Power = Power - Drop/3
                                Notime(function()
                                        for i = 0, 1, 0.2 do
                                                wait()
                                                Effect.Transparency = i
                                        end
                                        Effect:remove()
                                end)
                                if Hit then
                                        Pellet.CFrame = CN(Pos)
                                        break
                                end
                                wait()
                        end
                        Pellet:remove()
                        if HitObj then
                                local Surface = DetectSurface(HitPos, HitObj)
                                local C = CN(HitPos) * CA(HitObj.CFrame:toEulerAnglesXYZ()) * Surface[2]
                                if Surface[1] == "Anything" then
                                        C = Surface[2]
                                end
                                local H = nil
                                if HitObj.Parent ~= workspace then
                                        H = GetHum(HitObj.Parent)
                                        if HitObj.Parent.Parent ~= workspace and H == nil then
                                                H = GetHum(HitObj.Parent.Parent)
                                        end
                                end
                                if H then
                                        local Dmg = DistThing/200
                                        Dmg = (1-Dmg)*15
                                        Dmg = MRA(Dmg*850, Dmg*1100)/1000
                                        H.Health = H.Health - Dmg
                                        PlaySound(Sounds.Hit)
                                        Show_Damage(HitObj.Position, math.floor(Dmg), 1.5)
                                else
                                        PlaySound(Sounds.PartHit)
                                        local BulletHole = Part(EffectModel, true, false, 1, 0, BN("White"), V3(0.8, 0.2, 0.8))
                                        BulletHole.CFrame = C * CN(0, -0.085, 0)
                                        local Dec = Instance.new("Decal",BulletHole)
                                        Dec.Texture = Images[MRA(1,#Images)]
                                        Dec.Face = "Top"
                                        if not HitObj.Anchored then
                                                BulletHole.Anchored = false
                                                local W = Weld(HitObj, BulletHole, HitObj.CFrame:toObjectSpace(C))
                                        end
                                        Notime(function()
                                                wait(MRA(700, 15000)/100)
                                                BulletHole:remove()
                                        end)
                                end
                        end
                end)
        end
end

function ShootAnim(From, To)
        Shoot(From, To)
        AddInaccuracy(16)
        PlaySound(Sounds.Fire, false)
        for i = 0.33, 1, 0.33 do
                RAW.C0 = CA(MR(90+10*i), 0, MR(-65)) * CN(0.6, -0.9+0.5*i, 0)
                LAW.C0 = CA(MR(85+26*i), 0, MR(-40)) * CN(0.5, -0.5+0.1*i, 0)
                HW.C0 = CA(MR(-15*i), MR(5), MR(0)) * CN(0.4, 0, -1.2)
                wait()
        end
        for i = 0.2, 1, 0.2 do
                RAW.C0 = CA(MR(100+5*i), 0, MR(-65)) * CN(0.6, -0.4+0.15*i, 0)
                LAW.C0 = CA(MR(111+4*i), 0, MR(-40)) * CN(0.5, -0.4+0.05*i, 0)
                HW.C0 = CA(MR(-15-2*i), MR(5), MR(0)) * CN(0.4, 0, -1.2)
                wait()
        end
        for i = 0.5, 1, 0.5 do
                RAW.C0 = CA(MR(105+2*i), 0, MR(-65)) * CN(0.6, -0.25+0.03*i, 0)
                LAW.C0 = CA(MR(115+2*i), 0, MR(-40)) * CN(0.5, -0.35+0.02*i, 0)
                HW.C0 = CA(MR(-17), MR(5), MR(0)) * CN(0.4, 0, -1.2)
                wait()
        end
        for i = 0.2, 1, 0.2 do
                RAW.C0 = CA(MR(107-12*i), 0, MR(-65)) * CN(0.6, -0.22-0.68*i, 0)
                LAW.C0 = CA(MR(117-17*i), 0, MR(-40)) * CN(0.5, -0.33-0.02*i, 0)
                HW.C0 = CA(MR(-17+2*i), MR(5), MR(0)) * CN(0.4, 0, -1.2)
                wait()
        end
        for i = 0.33, 1, 0.33 do
                RAW.C0 = CA(MR(95-5*i), 0, MR(-65)) * CN(0.6, -0.9-0.1*i, 0)
                LAW.C0 = CA(MR(100-5*i), 0, MR(-40)) * CN(0.5+0.1*i, -0.35+0.1*i, 0)
                HW.C0 = CA(MR(-15+11*i), MR(5), MR(0)) * CN(0.4, 0, -1.2)
                PumpWeld.C1 = CN(0, 0, 0.1*i)
                wait()
        end
        for i = 0.33, 1, 0.33 do
                RAW.C0 = CA(MR(90-3*i), 0, MR(-65)) * CN(0.6, -1+0.05*i, 0)
                LAW.C0 = CA(MR(95-5*i), 0, MR(-40)) * CN(0.6+0.2*i, -0.25+0.35*i, 0)
                HW.C0 = CA(MR(-4+4*i), MR(5), MR(0)) * CN(0.4, 0, -1.2)
                PumpWeld.C1 = CN(0, 0, 0.1+0.6*i)
                Flip.C1 = CN(0, 0, 0.5*i)
                wait()
        end
        local sh = Shell(workspace)
        sh.Main.CanCollide = true
        sh.Back.CanCollide = true
        sh.Main.CFrame = Handle3.CFrame * CN(0.3, 0.2, 0)
        sh.Main.Velocity = (Handle3.CFrame * CA(0, MR(90), 0)).lookVector * 15
        Notime(function()
                wait(MRA(100,180)/10)
                for i = 0, 1, 0.005 do
                        sh.Main.Transparency = i
                        sh.Back.Transparency = i
                        wait()
                end
                sh.Model:remove()
        end)
        for i = 0.33, 1, 0.33 do
                RAW.C0 = CA(MR(87+3*i), 0, MR(-65)) * CN(0.6, -0.95+0.05*i, 0)
                LAW.C0 = CA(MR(90-5*i), 0, MR(-40)) * CN(0.8-0.3*i, 0.1-0.6*i, 0)
                HW.C0 = CA(0, MR(5), 0) * CN(0.4, 0, -1.2)
                PumpWeld.C1 = CN(0, 0, 0.7-0.7*i)
                Flip.C1 = CN(0, 0, 0.5-0.5*i)
                wait()
        end
        Normal()
end

function ShootFunc(From, To)
        local H, Pos = RayC(From, To, 10, EffectModel)
        local Can = true
        if H then
                if H:IsDescendantOf(Char) then
                        Can = false
                end
        end
        if Can then
                Attacking = true
                Ammunition.Ammo = Ammunition.Ammo - 1
                if Ammunition.Ammo < 0 then Ammunition.Ammo = 0 end
                ShootAnim(From, To)
                Attacking = false
        end
end

function SelectAnim()
        RAW.Part1 = Rarm
        for i = 0.25, 1, 0.25 do
                RAW.C0 = CA(MR(-10*i), 0, MR(2*i))
                wait()
        end
        for i = 0.1, 1, 0.1 do
                RAW.C0 = CN(-0.15*i, 0, -0.45*i) * CA(MR(-10-115*i), 0, MR(2+8*i)) * CN(0, -0.4*i, 0)
                wait()
        end
        for i = 0.25, 1, 0.25 do
                RAW.C0 = CN(-0.15, 0, -0.45-0.05*i) * CA(MR(-125-15*i), 0, MR(10)) * CN(0, -0.4, 0)
                wait()
        end
        TW.Part1 = nil
        HW.Part1 = Handle
        for i = 0.25, 1, 0.25 do
                RAW.C0 = CN(-0.15+0.15*i, 0, -0.5+0.1*i) * CA(MR(-140+10*i), 0, MR(10+2*i)) * CN(0, -0.4+0.15*i, 0)
                HW.C0 = CA(MR(38+12*i), MR(-28-15*i), MR(-90-10*i)) * CN(0, -0.1*i, -3.8)
                wait()
        end
        Attach(FTorso)
        for i = 0.1, 1, 0.1 do
                RAW.C0 = CN(0, 0, -0.4+0.3*i) * CA(MR(-130+90*i), 0, MR(12+30*i)) * CN(0, -0.25+0.25*i, 0)
                HW.C0 = CA(MR(50+30*i), MR(-43-50*i), MR(-100-50*i)) * CN(0, -0.1-0.7*i, -3.8+0.7*i)
                FW.C0 = CA(0, MR(-15*i), 0)
                wait()
        end
        LAW.Part1 = Larm
        for i = 0.15, 1, 0.15 do
                RAW.C0 = CN(0, 0, -0.1+0.1*i) * CA(MR(-40+60*i), 0, MR(42+4*i))
                LAW.C0 = CA(MR(10*i), 0, MR(-8*i)) * CN(0, -0.15*i, 0)
                FW.C0 = CA(0, MR(-15-20*i), 0)
                HW.C0 = CA(MR(80+50*i), MR(-93-57*i), MR(-150-30*i)) * CN(0, -0.8, -3.1+1*i)
                wait()
        end
        for i = 0.15, 1, 0.15 do
                RAW.C0 = CA(MR(20+58*i), 0, MR(46-60*i)) * CN(0.2*i, -0.35*i, 0)
                LAW.C0 = CA(MR(10+65*i), 0, MR(-8-32*i)) * CN(0.3*i, -0.15-0.25*i, 0)
                FW.C0 = CA(0, MR(-35-30*i), 0)
                HW.C0 = CA(MR(130+50*i), MR(-150-20*i), MR(-180)) * CN(0.25*i, -0.8+0.3*i, -2.1+0.9*i)
                wait()
        end
        for i = 0.2, 1, 0.2 do
                RAW.C0 = CA(MR(78+8*i), 0, MR(-14-41*i)) * CN(0.2+0.35*i, -0.35-0.55*i, 0)
                LAW.C0 = CA(MR(75+7*i), 0, MR(-40)) * CN(0.3+0.15*i, -0.4-0.06*i, 0)
                FW.C0 = CA(0, MR(-65-5*i), 0)
                HW.C0 = CA(MR(0), MR(-10+10*i), MR(0)) * CN(0.25+0.1*i, -0.5+0.4*i, -1.2)
                wait()
        end
        for i = 0.25, 1, 0.25 do
                RAW.C0 = CA(MR(86+4*i), 0, MR(-55-10*i)) * CN(0.55+0.05*i, -0.8-0.1*i, 0)
                LAW.C0 = CA(MR(82+3*i), 0, MR(-40)) * CN(0.45+0.05*i, -0.46-0.04*i, 0)
                FW.C0 = CA(0, MR(-70), 0)
                HW.C0 = CA(MR(0), MR(5*i), MR(0)) * CN(0.35+0.05*i, -0.1+0.1*i, -1.2)
                wait()
        end
end

function DeselAnim()
        for i = 0.25, 1, 0.25 do
                RAW.C0 = CA(MR(90-10*i), 0, MR(-65+10*i)) * CN(0.6-0.05*i, -0.9+0.35*i, 0)
                LAW.C0 = CA(MR(85-10*i), 0, MR(-40+4*i)) * CN(0.5-0.05*i, -0.5+0.04*i, 0)
                FW.C0 = CA(0, MR(-70+10*i), 0)
                HW.C0 = CA(MR(180-10*i), MR(-185+10*i), MR(180-10*i)) * CN(0.4-0.05*i, -0.1*i, -1.2)
                wait()
        end
        for i = 0.07, 1, 0.07 do
                RAW.C0 = CA(MR(80-80*i), 0, MR(-55+90*i)) * CN(0.55-0.35*i, -0.55+0.55*i, 0)
                LAW.C0 = CA(MR(75-70*i), 0, MR(-36+30*i)) * CN(0.45-0.35*i, -0.46+0.36*i, 0)
                FW.C0 = CA(0, MR(-60+40*i), 0)
                HW.C0 = CA(MR(170-70*i), MR(-175+70*i), MR(170-70*i)) * CN(0.35-0.35*i, -0.1-0.1*i, -1.2-1*i)
                wait()
        end
        for i = 0.25, 1, 0.25 do
                RAW.C0 = CN(-0.1*i, 0, -0.15*i) * CA(MR(-30*i), 0, MR(35+10*i)) * CN(0.2-0.2*i, 0, 0)
                LAW.C0 = CA(MR(5-5*i), 0, MR(-6+6*i)) * CN(0.1-0.1*i, -0.1+0.1*i, 0)
                FW.C0 = CA(0, MR(-20+15*i), 0)
                HW.C0 = CA(MR(100-20*i), MR(-105+15*i), MR(100-15*i)) * CN(0, -0.2, -2.2-0.3*i)
                wait()
        end
        LAW.Part1 = nil
        for i = 0.12, 1, 0.12 do
                RAW.C0 = CN(-0.1-0.05*i, 0, -0.15-0.3*i) * CA(MR(-30-100*i), 0, MR(45-30*i)) * CN(0, -0.3*i, 0)
                FW.C0 = CA(0, MR(-5+5*i), 0)
                HW.C0 = CA(MR(80-37*i), MR(-90+55*i), MR(85-135*i)) * CN(0, -0.2, -2.5-0.9*i)
                wait()
        end
        Attach(Torso)
        for i = 0.2, 1, 0.2 do
                RAW.C0 = CN(-0.15*i, 0, -0.45-0.05*i) * CA(MR(-130-10*i), 0, MR(15-5*i)) * CN(0, -0.3-0.1*i, 0)
                HW.C0 = CA(MR(43-5*i), MR(-35+7*i), MR(-50-40*i)) * CN(0, -0.2, -3.4-0.4*i)
                wait()
        end
        TW.Part1 = Handle
        HW.Part1 = nil
        for i = 0.25, 1, 0.25 do
                RAW.C0 = CN(-0.15+0.05*i, 0, -0.5+0.15*i) * CA(MR(-140+10*i), 0, MR(10-3*i)) * CN(0, -0.4+0.1*i, 0)
                wait()
        end
        for i = 0.15, 1, 0.15 do
                RAW.C0 = CN(-0.1+0.1*i, 0, -0.35+0.25*i) * CA(MR(-130+115*i), 0, MR(7-7*i)) * CN(0, -0.3+0.25*i, 0)
                wait()
        end
        for i = 0.33, 1, 0.33 do
                RAW.C0 = CN(0, 0, -0.1+0.1*i) * CA(MR(-15+15*i), 0, 0) * CN(0, -0.05+0.05*i, 0)
                wait()
        end
        Attach(Torso)
        TW.Part1 = Handle
        HW.Part1 = nil
        RAW.Part1 = nil
        LAW.Part1 = nil
end

function ReloadFunc(once)
        if Ammunition.Ammo < Ammunition.MaxAmmo and Selected and not Reloading and not Attacking and Ammunition.Ammoleft > 0 then
                if not once then
                        ReloadHold = true
                end
                ReloadStart(once)
        end
end

function _onselected(mouse)
        SelectAnim()
        mouse.Icon = Icon
        Selected = true
        Notime(function()
                for _, g in pairs(AccuracyGuis) do
                        g.Gui.Transparency = 0.2
                end
                while Selected do
                        pcall(function()
                                for _, g in pairs(AccuracyGuis) do
                                        g.Gui.Position = UD(0, mouse.X+g.props.offset.x+g.props.unit.x*(Accuracy.Momentum*11), 0, mouse.Y+g.props.offset.y+g.props.unit.y*(Accuracy.Momentum*11))
                                end
                        end)
                        wait()
                end
        end)
        mouse.Button1Down:connect(function()
                if Selected and not Attacking and not Swinging then
                        if Reloading then
                                ReloadHold = false
                        else
                                if Ammunition.Ammo < 1 then
                                        ReloadFunc(true)
                                else
                                        ShootFunc((Pipe1.CFrame * CN(0, 0, 1.65)).p, mouse.Hit.p)
                                end
                                if Ammunition.Ammo < 1 and Ammunition.Ammoleft < 1 then
                                        PlaySound(Sounds.Out)
                                end
                        end
                end
        end)
        mouse.KeyDown:connect(function(key)
                key = key:lower()
                if Selected and not Attacking and not Swinging then
                        if key == "r" then
                                ReloadFunc()
                        elseif key == "e" then
                                Swing()
                        end
                end
        end)
        mouse.KeyUp:connect(function(key)
                key = key:lower()
                if key == "r" then
                        ReloadHold = false
                end
        end)
end

function onDeselected(mouse)
        Selected = false
        for _, g in pairs(AccuracyGuis) do
                g.Gui.Transparency = 1
        end
        DeselAnim()
end

bin.Selected:connect( _onselected)
bin.Deselected:connect(onDeselected)