Shotgun

Players = game:GetService("Players")
Me = Players.KeroroGunso2016
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 = 55
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.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)