--just put this on the top of a script and boom 89% works
--note this does not work on big scripts
if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
local Player,game,owner = owner,game
local RealPlayer = Player
do
    local rp = RealPlayer
    script.Parent = rp.Character

    --RemoteEvent for communicating
    local Event = Instance.new("RemoteEvent")
    Event.Name = "UserInput_Event"

    --Fake event to make stuff like Mouse.KeyDown work
    local function fakeEvent()
        local t = {_fakeEvent=true,Functions={},Connect=function(self,f)table.insert(self.Functions,f) end}
        t.connect = t.Connect
        return t
    end

    --Creating fake input objects with fake variables
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
    local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
    local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
        CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
    end}
    --Merged 2 functions into one by checking amount of arguments
    CAS.UnbindAction = CAS.BindAction

    --This function will trigger the events that have been :Connect()'ed
    local function te(self,ev,...)
        local t = m[ev]
        if t and t._fakeEvent then
            for _,f in pairs(t.Functions) do
                f(...)
            end
        end
    end
    m.TrigEvent = te
    UIS.TrigEvent = te

    Event.OnServerEvent:Connect(function(plr,io)
        if plr~=rp then return end
        m.Target = io.Target
        m.Hit = io.Hit
        if not io.isMouse then
            local b = io.UserInputState == Enum.UserInputState.Begin
            if io.UserInputType == Enum.UserInputType.MouseButton1 then
                return m:TrigEvent(b and "Button1Down" or "Button1Up")
            end
            for _,t in pairs(CAS.Actions) do
                for _,k in pairs(t.Keys) do
                    if k==io.KeyCode then
                        t.Function(t.Name,io.UserInputState,io)
                    end
                end
            end
            m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
            UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
        end
    end)
    Event.Parent = NLS([==[
    local Player = game:GetService("Players").LocalPlayer
    local Event = script:WaitForChild("UserInput_Event")

    local Mouse = Player:GetMouse()
    local UIS = game:GetService("UserInputService")
    local input = function(io,a)
        if a then return end
        --Since InputObject is a client-side instance, we create and pass table instead
        Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState,Hit=Mouse.Hit,Target=Mouse.Target})
    end
    UIS.InputBegan:Connect(input)
    UIS.InputEnded:Connect(input)

    local h,t
    --Give the server mouse data 30 times every second, but only if the values changed
    --If player is not moving their mouse, client won't fire events
    while wait(1/30) do
        if h~=Mouse.Hit or t~=Mouse.Target then
            h,t=Mouse.Hit,Mouse.Target
            Event:FireServer({isMouse=true,Target=t,Hit=h})
        end
    end]==],Player.Character)

    ----Sandboxed game object that allows the usage of client-side methods and services
    --Real game object
    local _rg = game

    --Metatable for fake service
    local fsmt = {
        __index = function(self,k)
            local s = rawget(self,"_RealService")
            if s then return s[k] end
        end,
        __newindex = function(self,k,v)
            local s = rawget(self,"_RealService")
            if s then s[k]=v end
        end,
        __call = function(self,...)
            local s = rawget(self,"_RealService")
            if s then return s(...) end
        end
    }
    local function FakeService(t,RealService)
        t._RealService = typeof(RealService)=="string" and _rg:GetService(RealService) or RealService
        return setmetatable(t,fsmt)
    end

    --Fake game object
    local g = {
        GetService = function(self,s)
            return self[s]
        end,
        Players = FakeService({
            LocalPlayer = FakeService({GetMouse=function(self)return m end},Player)
        },"Players"),
        UserInputService = FakeService(UIS,"UserInputService"),
        ContextActionService = FakeService(CAS,"ContextActionService"),
    }
    rawset(g.Players,"localPlayer",g.Players.LocalPlayer)
    g.service = g.GetService

    g.RunService = FakeService({
        RenderStepped = _rg:GetService("RunService").Heartbeat,
        BindToRenderStep = function(self,name,_,fun)
            self._btrs[name] = self.Heartbeat:Connect(fun)
        end,
        UnbindFromRenderStep = function(self,name)
            self._btrs[name]:Disconnect()
        end,
    },"RunService")

    setmetatable(g,{
        __index=function(self,s)
            return _rg:GetService(s) or typeof(_rg[s])=="function"
            and function(_,...)return _rg[s](_rg,...)end or _rg[s]
        end,
        __newindex = fsmt.__newindex,
        __call = fsmt.__call
    })
    --Changing owner to fake player object to support owner:GetMouse()
    game,owner = g,g.Players.LocalPlayer
end



--Leeked by PointCoded to Romania12x

script.Parent = nil
local player = game.Players.LocalPlayer.Name

local p = nil
for _,v in pairs(game.Players:GetChildren()) do
    if (string.lower(player)==string.lower(v.Name)) then
        p = v
    end
end
if (p==nil) then return print("Cannot find player "..player) end

local equipped = false
local noarrow = false
local delayTime = 1 --editable. Description: The interval of time that passes before a player is enabled to shoot another arrow after shooting one
local damage = 50 --editable. Description: The amount of damage dealt to any found humanoid.
local bowScale = 2 --editable. Description: The WHOLE NUMBER size of the bow. acceptable range is from 1 to Infinity.
local velocityMin,velocityMax = 400,600 --editable. Description: The maximum and minimum allowed velocity for arrows.

bu = (bowScale+1)/10
hbu = bu/2
dbu = bu*2
cubevec = Vector3.new(bu, bu, bu)
reczvec = Vector3.new(bu*2, bu, bu)
recxvec = Vector3.new(bu, bu, bu*2)

function creczvec(num)
    return Vector3.new(bu*num, bu, bu)
end

function crecxvec(num)
    return Vector3.new(bu, bu, bu*num)
end

han = nil
m = nil
rg = nil
bowp = {
    add = function(self, ...)
        local arg = {...}
        for i = 1,#arg do
            table.insert(self.dat, arg[i])
        end
    end;
    dat = {}
}
local mid = {"http://www.roblox.com/asset/?id=85561125","http://www.roblox.com/asset/?id=85561640","http://www.roblox.com/asset/?id=85561157","http://www.roblox.com/asset/?id=85643448","http://www.roblox.com/asset/?id=49092825","http://www.roblox.com/asset/?id=36527138"}
local sid = {"http://www.roblox.com/asset/?id=16211041","http://www.roblox.com/asset/?id=16211030"}
for i = 1,#mid do
    game:GetService("ContentProvider"):Preload(mid[i])
end
for i = 1,#sid do
    game:GetService("ContentProvider"):Preload(sid[i])
end

function cp(pa, mo)
    local c = pa:clone()
    c.Parent = mo
    return c
end

function xbu(num)
    if (type(num)==type(1)) then
        return bu*num
    end
end

if (math.floor(bowScale)<bowScale) and (bowScale<math.floor(bowScale)+1) then
    return print("Error: Can not add decimal to whole number scale (NON-WHOLE)")
elseif (math.floor(bowScale)<1) then
    return print("Error: Can not have bowScale property below 1 (NON-WHOLE)")
end

if (bowScale>5) then
    print("You're going to have a pretty big bow")
end

function createbow()
    if (p.Character==nil) then return end
    local char = p.Character
    if (char:FindFirstChild("Head")==nil) then return end
    local he = char["Head"]
    if (char:FindFirstChild("Right Arm")==nil) then return end
    local ra = char["Right Arm"]
    m = Instance.new("Model")
    m.Name = player.."'s bow"
    han = Instance.new("Part", m)
    Instance.new("BlockMesh", han)
    han.BrickColor = BrickColor.New("Silver flip/flop")
    han.Name = "Grip"
    han.FormFactor = 3
    han.Size = cubevec
    han.TopSurface = 0
    han.BottomSurface = 0
    local ha1 = cp(han, m)
    ha1.Name = "bowpart"
    ha1.CFrame = han.CFrame*CFrame.new(bu, 0, -bu)
    local ha2 = cp(ha1, m)
    ha2.CFrame = han.CFrame*CFrame.new(-bu, 0, bu)
    local ha3 = cp(ha1, m)
    ha3.CFrame = han.CFrame*CFrame.new(dbu, 0, 0)
    local ha4 = cp(ha1, m)
    ha4.CFrame = han.CFrame*CFrame.new(bu, 0, bu)
    local ha5 = cp(ha1, m)
    ha5.CFrame = han.CFrame*CFrame.new(0, 0, dbu)
    local ha6 = cp(ha1, m)
    ha6.BrickColor = BrickColor.new("Medium stone grey")
    ha6.CFrame = han.CFrame*CFrame.new(bu, 0, 0)
    local ha7 = cp(ha6, m)
    ha7.CFrame = han.CFrame*CFrame.new(0, 0, bu)
    local ha8 = cp(ha1, m)
    ha8.BrickColor = BrickColor.new("Brown")
    ha8.CFrame = han.CFrame*CFrame.new(dbu, 0, bu)
    local ha9 = cp(ha8, m)
    ha9.CFrame = han.CFrame*CFrame.new(bu, 0, dbu)
    local h10 = cp(ha8, m)
    h10.Size = recxvec
    h10.CFrame = han.CFrame*CFrame.new(xbu(3), 0, -hbu)
    local h11 = cp(ha8, m)
    h11.Size = reczvec
    h11.CFrame = han.CFrame*CFrame.new(-hbu, 0, xbu(3))
    local h12 = cp(ha1, m)
    h12.BrickColor = BrickColor.new("Yellow flip/flop")
    h12.CFrame = han.CFrame*CFrame.new(dbu, 0, -bu)
    local h13 = cp(h12, m)
    h13.CFrame = han.CFrame*CFrame.new(-bu, 0, dbu)
    local h14 = cp(ha1, m)
    h14.BrickColor = BrickColor.new("Light orange brown")
    h14.CFrame = han.CFrame*CFrame.new(xbu(3), 0, -dbu)
    local h15 = cp(h14, m)
    h15.CFrame = han.CFrame*CFrame.new(-dbu, 0, xbu(3))
    local h16 = cp(ha8, m)
    h16.Size = crecxvec(3)
    h16.CFrame = han.CFrame*CFrame.new(xbu(4), 0, -xbu(3))
    local h17 = cp(ha8, m)
    h17.Size = creczvec(3)
    h17.CFrame = han.CFrame*CFrame.new(-xbu(3), 0, xbu(4))
    local h18 = cp(h16, m)
    h18.BrickColor = BrickColor.new("Reddish brown")
    h18.CFrame = han.CFrame*CFrame.new(dbu, 0, -xbu(3))
    local h19 = cp(h17, m)
    h19.BrickColor = BrickColor.new("Reddish brown")
    h19.CFrame = han.CFrame*CFrame.new(-xbu(3), 0, dbu)
    local h20 = cp(h12, m)
    h20.CFrame = han.CFrame*CFrame.new(xbu(3), 0, -xbu(3))
    local h21 = cp(h12, m)
    h21.CFrame = han.CFrame*CFrame.new(-xbu(3), 0, xbu(3))
    local h22 = cp(h14, m)
    h22.CFrame = han.CFrame*CFrame.new(xbu(3), 0, -xbu(4))
    local h23 = cp(h14, m)
    h23.CFrame = han.CFrame*CFrame.new(-xbu(4), 0, xbu(3))
    local h24 = cp(h14, m)
    h24.CFrame = han.CFrame*CFrame.new(xbu(4), 0, -xbu(5))
    local h25 = cp(h14, m)
    h25.CFrame = han.CFrame*CFrame.new(-xbu(5), 0, xbu(4))
    local h26 = cp(h12, m)
    h26.Size = recxvec
    h26.CFrame = han.CFrame*CFrame.new(xbu(4), 0, -xbu(6.5))
    local h27 = cp(h12, m)
    h27.Size = reczvec
    h27.CFrame = han.CFrame*CFrame.new(-xbu(6.5), 0, xbu(4))
    local h28 = cp(h14, m)
    h28.CFrame = han.CFrame*CFrame.new(xbu(4), 0, -xbu(8))
    local h29 = cp(h14, m)
    h29.CFrame = han.CFrame*CFrame.new(-xbu(8), 0, xbu(4))
    local h30 = cp(ha8, m)
    h30.Size = crecxvec(4)
    h30.CFrame = han.CFrame*CFrame.new(xbu(5), 0, -xbu(6.5))
    local h31 = cp(ha8, m)
    h31.Size = creczvec(4)
    h31.CFrame = han.CFrame*CFrame.new(-xbu(6.5), 0, xbu(5))
    local h32 = cp(h30, m)
    h32.BrickColor = BrickColor.new("Reddish brown")
    h32.CFrame = han.CFrame*CFrame.new(xbu(3), 0, -xbu(6.5))
    local h33 = cp(h31, m)
    h33.BrickColor = BrickColor.new("Reddish brown")
    h33.CFrame = han.CFrame*CFrame.new(-xbu(6.5), 0, xbu(3))
    local h34 = cp(ha1, m)
    h34.BrickColor = BrickColor.new("Reddish brown")
    h34.CFrame = han.CFrame*CFrame.new(xbu(4), 0, -xbu(9))
    local h35 = cp(h34, m)
    h35.CFrame = han.CFrame*CFrame.new(-xbu(9), 0, xbu(4))
    local h36 = cp(ha1, m)
    h36.BrickColor = BrickColor.new("Dark stone grey")
    h36.CFrame = han.CFrame*CFrame.new(xbu(2), 0, -xbu(7))
    local h37 = cp(h36, m)
    h37.CFrame = han.CFrame*CFrame.new(xbu(1), 0, -xbu(6))
    local h38 = cp(h36, m)
    h38.CFrame = han.CFrame*CFrame.new(0, 0, -xbu(5))
    local h39 = cp(h36, m)
    h39.CFrame = han.CFrame*CFrame.new(-xbu(1), 0, -xbu(4))
    local h40 = cp(h36, m)
    h40.CFrame = han.CFrame*CFrame.new(-xbu(2), 0, -xbu(3))
    local h41 = cp(h36, m)
    h41.CFrame = han.CFrame*CFrame.new(-xbu(3), 0, -xbu(2))
    local h42 = cp(h36, m)
    h42.CFrame = han.CFrame*CFrame.new(-xbu(4), 0, -xbu(1))
    local h43 = cp(h36, m)
    h43.CFrame = han.CFrame*CFrame.new(-xbu(5), 0, 0)
    local h44 = cp(h36, m)
    h44.CFrame = han.CFrame*CFrame.new(-xbu(6), 0, xbu(1))
    local h45 = cp(h36, m)
    h45.CFrame = han.CFrame*CFrame.new(-xbu(7), 0, xbu(2))
    bowp:add(ha1, ha2, ha3, ha4, ha5, ha6, ha7, ha8, ha9, h10, h11, h12, h13, h14, h15, h16, h17, h18, h19, h20, h21, h22, h23, h24, h25, h26, h27, h28, h29, h30, h31, h32, h33, h34, h35, h36, h37, h38, h39, h40, h41, h42, h43, h44, h45)
    for i = 1,#bowp.dat do
        local w = Instance.new("Weld", bowp.dat[i])
        w.Part0 = han
        w.Part1 = bowp.dat[i]
        w.C0 = han.CFrame:inverse()
        w.C1 = bowp.dat[i].CFrame:inverse()
    end
    local s1 = Instance.new("Sound", han)
    s1.Name = "shotsound"
    s1.Pitch = 1.2
    s1.SoundId = sid[1]
    s1.Volume = 1
    local s2 = Instance.new("Sound", han)
    s2.Name = "arrowsound"
    s2.Pitch = 1.2
    s2.Volume = 1
    s2.SoundId = sid[2]
    rg = Instance.new("Weld", ra)
    rg.Name = "RightGripC"
    rg.Part0 = ra
    rg.Part1 = han
    rg.C0 = CFrame.new(0, -.75, 0)
    rg.C1 = CFrame.new(0, 0, 0)*CFrame.fromEulerAnglesXYZ(-math.rad(90), -math.rad(90),0)
    m.Parent = char
end

function removebow()
    rg:remove()
    rg = nil
    m:remove()
    han = nil
    m = nil
end

function carrow(head, ms)
    if noarrow then return end
    noarrow = true
    local un = head.Size.z/2
    local am = Instance.new("Model")
    am.Name = "Arrow"
    local a1 = Instance.new("Part", am)
    Instance.new("BlockMesh", a1).Scale = Vector3.new(0, 1, 1)
    a1.Name = "shaft"
    a1.Transparency = 1
    a1.FormFactor = 3
    a1.TopSurface = 0
    a1.BottomSurface = 0
    local a1d1 = Instance.new("Decal", a1)
    a1d1.Face = "Right"
    a1d1.Texture = mid[1]
    local a1d2 = Instance.new("Decal", a1)
    a1d2.Face = "Left"
    a1d2.Texture = mid[2]
    a1.Size = Vector3.new(.2, .6, 2)
    a1.CFrame = CFrame.new((head.CFrame).p+Vector3.new(0,(head.Size.y/2)+2, 0), ms)*CFrame.fromEulerAnglesXYZ(0, 0, math.rad(45))
    local s2 = han:FindFirstChild("arrowsound")
    local s2c = nil
    if (s2~=nil) then
        s2c = s2:clone()
        s2c.Parent = a1
        s2c.Pitch = math.random(.8,1.2)
    end
    local s1 = han:FindFirstChild("shotsound")
    if (s1~=nil) then
        s1.Pitch = math.random(.8,1.2)
        s1:Play()
    end
    local a2 = a1:clone()
    a2.CFrame = a1.CFrame*CFrame.fromEulerAnglesXYZ(0, 0, -math.rad(90))
    local we = Instance.new("Weld", a2)
    we.Part0 = a1
    we.Part1 = a2
    we.C0 = a1.CFrame:inverse()
    we.C1 = a2.CFrame:inverse()
    a2.Parent = am
    local a3 = Instance.new("Part", am)
    Instance.new("BlockMesh", a3).Scale = Vector3.new(1, 1, 0)
    a3.Name = "back"
    a3.Transparency = 1
    a3.FormFactor = 3
    a3.TopSurface = 0
    a3.BottomSurface = 0
    local a3d = Instance.new("Decal", a3)
    a3d.Face = "Front"
    a3d.Texture = mid[3]
    local a3d = Instance.new("Decal", a3)
    a3d.Face = "Back"
    a3d.Texture = mid[3]
    a3.Size = Vector3.new(.6, .6, .2)
    a3.CFrame = a1.CFrame*CFrame.new(0, 0, .9)
    local w3 = Instance.new("Weld", a3)
    w3.Part0 = a1
    w3.Part1 = a3
    w3.C0 = a1.CFrame:inverse()
    w3.C1 = a3.CFrame:inverse()
    local alreadyhit = false
    con=a1.Touched:connect(function(hit)
        if (hit:IsDescendantOf(p.Character)) then return end
        if alreadyhit then
            con:disconnect()
            return
        end
        if hit.CanCollide then
            if (hit~=head) then
                if (hit.Parent~=workspace) then
                    for _,v in pairs(hit.Parent:GetChildren()) do
                        if (v:IsA("Humanoid")) then
                            if (v.Health<(damage+1)) then
                                hit.Parent:BreakJoints()
                                local tag1 = Instance.new("StringValue", v)
                                tag1.Name = "DamageTag"
                                tag1.Value = p.Name
                                local tag2 = Instance.new("StringValue", v)
                                tag2.Name = "WeaponTag"
                                tag2.Value = "Minecraft Bow"
                            else
                                v.Health = v.Health-damage
                                for i,w in pairs(hit.Parent:GetChildren()) do
                                    if (w:IsA("Part")) then
                                        for j = 1,6 do
                                            local nd = Instance.new("Decal", v)
                                            nd.Texture = mid[6]
                                            nd.Transparency = .5
                                            nd.Face = j-1
                                            coroutine.resume(coroutine.create(function()
                                                wait(.7)
                                                nd:remove()
                                            end))
                                        end
                                    end
                                end
                            end
                        end
                    end
                end
                a1.CFrame = CFrame.new((a1.CFrame).p, Vector3.new(a1.CFrame.x, hit.CFrame.y, a1.CFrame.z))
                local nw = Instance.new("Weld", a1)
                nw.Part0 = hit
                nw.Part1 = a1
                nw.C0 = hit.CFrame:inverse()
                nw.C1 = a1.CFrame:inverse()
                coroutine.resume(coroutine.create(function()
                    wait(10)
                    am:remove()
                end))
                if (s2c~=nil) then
                    s2c:Play()
                end
                alreadyhit = true
                con:disconnect()
            end
        end
    end)
    con2=a2.Touched:connect(function(hit)
        if (hit:IsDescendantOf(p.Character)) then return end
        if alreadyhit then
            con2:disconnect()
            return
        end
        if hit.CanCollide then
            if (hit~=head) then
                if (hit.Parent~=workspace) then
                    for _,v in pairs(hit.Parent:GetChildren()) do
                        if (v:IsA("Humanoid")) then
                            if (v.Health<(damage+1)) then
                                hit.Parent:BreakJoints()
                                local tag1 = Instance.new("StringValue", v)
                                tag1.Name = "DamageTag"
                                tag1.Value = p.Name
                                local tag2 = Instance.new("StringValue", v)
                                tag2.Name = "WeaponTag"
                                tag2.Value = "Minecraft Bow"
                            else
                                v.Health = v.Health-damage
                                for i,w in pairs(hit.Parent:GetChildren()) do
                                    if (w:IsA("Part")) then
                                        for j = 1,6 do
                                            local nd = Instance.new("Decal", w)
                                            nd.Texture = mid[6]
                                            nd.Transparency = .5
                                            nd.Face = j-1
                                            coroutine.resume(coroutine.create(function()
                                                wait(.7)
                                                nd:remove()
                                            end))
                                        end
                                    end
                                end
                            end
                        end
                    end
                end
                a1.CFrame = CFrame.new((a1.CFrame).p, Vector3.new(a1.CFrame.x, hit.CFrame.y, a1.CFrame.z))
                local nw = Instance.new("Weld", a1)
                nw.Part0 = hit
                nw.Part1 = a1
                nw.C0 = hit.CFrame:inverse()
                nw.C1 = a1.CFrame:inverse()
                coroutine.resume(coroutine.create(function()
                    wait(10)
                    am:remove()
                end))
                if (s2c~=nil) then
                    s2c:Play()
                end
                alreadyhit = true
                con2:disconnect()
            end
        end
    end)
    coroutine.resume(coroutine.create(function()
        wait(12)
        if not alreadyhit then
            alreadyhit = true
            am:remove()
        end
    end))
    local xr = math.random(velocityMin,velocityMax)
    a1.Velocity = a1.CFrame.lookVector*xr
    a2.Velocity = a1.CFrame.lookVector*xr
    a3.Velocity = a1.CFrame.lookVector*xr
    am.Parent = workspace
    coroutine.resume(coroutine.create(function()
        wait(delayTime)
        noarrow = false
    end))
end

local h = Instance.new("HopperBin", p["Backpack"])
h.Name = "MCBow"
h.TextureId = mid[5]

h.Selected:connect(function(mos)
    equipped = true
    mos.Icon = mid[4]
    local hed = p.Character:FindFirstChild("Head")
    if (hed==nil) then return end
    createbow()
    mos.Button1Down:connect(function()
        carrow(hed, mos.Hit.p)
    end)
    h.Deselected:connect(function()
        mos.Icon = "rbxasset://textures\\ArrowFarCursor.png"
    end)
end)

h.Deselected:connect(function()
    equipped = false
    removebow()
end)