--when you see YOURDRAGONNAME that means type your dragon name and when you see YOURNAMEHERE that mean you have to put your name--
MainColor = "Bright blue"

Name = "Guest310045"



Plrs = game:GetService("Players")



me = Plrs.YOURNAMEHERE

char = me.Character

Modelname = "xDragon"

PetName = "xDragon"

Toolname = "Dragon"

Surfaces = {"FrontSurface", "BackSurface", "TopSurface", "BottomSurface", "LeftSurface", "RightSurface"}

necko = CFrame.new(0, 1, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)

selected = false

Hurt = false

Deb = true

Able = true

Prop = {Damage = 30}



ToolIcon = ""

MouseIc = ""

MouseDo = ""



Add = {

        Sphere = function(P)

                local m = Instance.new("SpecialMesh",P)

                m.MeshType = "Sphere"

                return m

        end,

        BF = function(P)

                local bf = Instance.new("BodyForce",P)

                bf.force = Vector3.new(0, P:GetMass()*187, 0)

                return bf

        end,

        BP = function(P)

                local bp = Instance.new("BodyPosition",P)

                bp.maxForce = Vector3.new(math.huge, 0, math.huge)

                bp.P = 14000

                return bp

        end,

        BG = function(P)

                local bg = Instance.new("BodyGyro",P)

                bg.maxTorque = Vector3.new(math.huge, math.huge, math.huge)

                bg.P = 14000

                return bg

        end,

        Mesh = function(P, ID, x, y, z)

                local m = Instance.new("SpecialMesh")

                m.MeshId = ID

                m.Scale = Vector3.new(x, y, z)

                m.Parent = P

                return m

        end,

        Sound = function(P, ID, vol, pitch)

                local s = Instance.new("Sound")

                s.SoundId = ID

                s.Volume = vol

                s.Pitch = pitch

                s.Parent = P

                return s

        end

}



function find(tab, arg)

        local ah = nil

        for i,v in pairs(tab) do

                if v == arg then

                        ah = v

                end

        end

        return ah

end



function getAllParts(from)

        local t = {}

        function getParts(where)

                for i, v in pairs(where:children()) do

                        if v:IsA("BasePart") then

                                if v.Parent ~= char and v.Parent.Parent ~= char then

                                        table.insert(t, v)

                                end

                        end

                        getParts(v)

                end

        end

        getParts(workspace)

        return t

end



function RayCast(pos1, pos2, maxDist, forward)

        local list = getAllParts(workspace)

        local pos0 = pos1

        for dist = 1, maxDist, forward do

                pos0 = (CFrame.new(pos1, pos2) * CFrame.new(0, 0, -dist)).p

                for _, v in pairs(list) do

                        local pos3 = v.CFrame:pointToObjectSpace(pos0)

                        local s = v.Size

                        if pos3.x > -(s.x/2) and pos3.x < (s.x/2) and pos3.y > -(s.y/2) and pos3.y < (s.y/2) and pos3.z > -(s.z/2) and pos3.x < (s.z/2) and v.CanCollide == true then

                                return pos0, v

                        end

                end

        end

        return pos0, nil

end



function Part(Parent, Anchor, Collide, Tran, Ref, Color, X, Y, Z, Break)

        local p = Instance.new("Part")

        p.formFactor = "Custom"

        p.Anchored = Anchor

        p.CanCollide = Collide

        p.Transparency = Tran

        p.Reflectance = Ref

        p.BrickColor = BrickColor.new(Color)

        for _, Surf in pairs(Surfaces) do

                p[Surf] = "Smooth"

        end

        p.Size = Vector3.new(X, Y, Z)

        if Break then

                p:BreakJoints()

        else p:MakeJoints() end

        p.Parent = Parent

        return p

end



function Weld(p0, p1, x, y, z, a, b, c)

        local w = Instance.new("Weld")

        w.Parent = p0

        w.Part0 = p0

        w.Part1 = p1

        w.C1 = CFrame.new(x,y,z) * CFrame.Angles(a,b,c)

        return w

end



function ComputePos(pos1, pos2)

        local pos3 = Vector3.new(pos2.x, pos1.y, pos2.z)

        return CFrame.new(pos1, pos3)

end



function getHumanoid(c)

        local h = nil

        for i,v in pairs(c:children()) do

                if v:IsA("Humanoid") and c ~= char then

                        if v.Health > 0 then

                                h = v

                        end

                end

        end

        return h

end



for i,v in pairs(char:children()) do

        if v.Name == Modelname or v.Name == PetName then

                v:remove()

        end

end



torso = char.Torso

neck = torso.Neck

hum = char.Humanoid

Rarm = char["Right Arm"]

Larm = char["Left Arm"]

Rleg = char["Right Leg"]

Lleg = char["Left Leg"]



hc = Instance.new("Humanoid")

hc.Health = 0

hc.MaxHealth = 0



slash = Add.Sound(nil, "rbxasset://sounds//swordslash.wav", 0.9, 0.8)

hitsound = Add.Sound(nil, "http://www.roblox.com/asset/?id=2801263", 0.7, 0.6)

charge = Add.Sound(nil, "http://www.roblox.com/asset/?id=2101137", 0.8, 0.65)

boom = Add.Sound(nil, "http://www.roblox.com/asset/?id=2691586", 0.8, 0.3)

smashsound = Add.Sound(nil, "http://www.roblox.com/asset/?id=2692806", 0.8, 0.35)

boomboom = Add.Sound(nil, "http://www.roblox.com/asset/?id=2760979", 1, 0.18)



function PlaySound(sound, pitch, vol)

        local s = sound:clone()

        if pitch ~= nil then

                if tonumber(pitch) then

                        s.Pitch = tonumber(pitch)

                end

        end

        if vol ~= nil then

                if tonumber(vol) then

                        s.Volume = tonumber(vol)

                end

        end

        s.Parent = torso

        s.PlayOnRemove = true

        coroutine.resume(coroutine.create(function()

                wait()

                s:remove()

        end))

end



Mo = Instance.new("Model")

Mo.Name = Modelname



RABrick = Part(Mo, false, false, 1, 0, "White", 0.1, 0.1, 0.1, true)

LABrick = Part(Mo, false, false, 1, 0, "White", 0.1, 0.1, 0.1, true)

RLBrick = Part(Mo, false, false, 1, 0, "White", 0.1, 0.1, 0.1, true)

LLBrick = Part(Mo, false, false, 1, 0, "White", 0.1, 0.1, 0.1, true)



RABW = Weld(torso, RABrick, -1.5, -0.5, 0, 0, 0, 0)

LABW = Weld(torso, LABrick, 1.5, -0.5, 0, 0, 0, 0)

RLBW = Weld(torso, RLBrick, -0.5, 1.2, 0, 0, 0, 0)

LLBW = Weld(torso, LLBrick, 0.5, 1.2, 0, 0, 0, 0)



RAW = Weld(RABrick, nil, 0, 0.5, 0, 0, 0, 0)

LAW = Weld(LABrick, nil, 0, 0.5, 0, 0, 0, 0)

RLW = Weld(RLBrick, nil, 0, 0.8, 0, 0, 0, 0)

LLW = Weld(LLBrick, nil, 0, 0.8, 0, 0, 0, 0)



HB = Part(Mo, false, false, 1, 0, "White", 0.1, 0.1, 0.1, true)

HBW = Weld(Rarm, HB, 0, 1, 0, 0, 0, 0)

HW = Weld(HB, nil, 0, -1.3, 0, math.pi/2, 0, 0)



TH = Weld(torso, nil, -0.8, 0.4, -0.4, 0, math.pi/2, math.rad(80))



RAWStand, LAWStand, RLWStand, LLWStand, HWStand = nil



--handle = Part(Mo, false, false, 0, 0, GuitarColour, 0.6, 1.5, 1.5, true)



Pet = Instance.new("Model")

Pet.Name = PetName



petbody = Part(Pet, false, true, 0, 0, MainColor, 3, 2.6, 6, true)

Add.Sphere(petbody)

petbody.CFrame = torso.CFrame * CFrame.new(4, 0, 0)



bodytrim = Part(Pet, false, true, 0, 0, "Cool yellow", 2.7, 2.4, 5.4, true)

Add.Sphere(bodytrim)

Weld(petbody, bodytrim, 0, 0.25, 0, 0, 0, 0)



neckplace = Part(Pet, false, false, 0, 0, "Cool yellow", 0.1, 0.1, 0.1, true)

Weld(petbody, neckplace, 0, -0.2, 2.6, 0, 0, 0)



Mo.Parent = char

Pet.Parent = char

TH.Part1 = handle



if script.Parent.className ~= "HopperBin" then

        h = Instance.new("HopperBin",me.Backpack)

        h.Name = Toolname

        h.TextureId = ToolIcon

        script.Parent = h

end



bin = script.Parent



function detach(bool)

        LLW.C0 = CFrame.new(0, 0, 0)

        RLW.C0 = CFrame.new(0, 0, 0)

        LAW.C0 = CFrame.new(0,0,0)

        RAW.C0 = CFrame.new(0, 0, 0)

        if bool then

                LLW.Part1 = nil

                RLW.Part1 = nil

                RAW.Part1 = nil

                LAW.Part1 = nil

        end

end



function attach()

        RAW.Part1 = Rarm

        LAW.Part1 = Larm

        RLW.Part1 = Rleg

        LLW.Part1 = Lleg

end



function normal()

        neck.C0 = NeckStand

        RAW.C0 = RAWStand

        LAW.C0 = LAWStand

        RLW.C0 = RLWStand

        LLW.C0 = LLWStand

        RAW.C1 = CFrame.new(0, 0.5, 0)

        LAW.C1 = CFrame.new(0, 0.5, 0)

        RLW.C1 = CFrame.new(0, 0.8, 0)

        LLW.C1 = CFrame.new(0, 0.8, 0)

        HW.C0 = HWStand

end



function idleanim()

        attach()

        for i = 0, 1, 0.03 do

                RAW.C0 = RAWStand * CFrame.Angles(0, 0, 0)

                LAW.C0 = LAWStand * CFrame.Angles(0, 0, 0)

                RLW.C0 = RLWStand * CFrame.Angles(0, 0, 0)

                LLW.C0 = LLWStand * CFrame.Angles(0, 0, 0)

                neck.C0 = NeckStand * CFrame.Angles(0, 0, 0)

                if selected == false or torso.Velocity.magnitude > 2 or Able == false then break end

                wait()

        end

        wait()

        for i = 1, 0, -0.02 do

                RAW.C0 = RAWStand * CFrame.Angles(0, 0, 0)

                LAW.C0 = LAWStand * CFrame.Angles(0, 0, 0)

                RLW.C0 = RLWStand * CFrame.Angles(0, 0, 0)

                LLW.C0 = LLWStand * CFrame.Angles(0, 0, 0)

                neck.C0 = NeckStand * CFrame.Angles(0, 0, 0)

                if selected == false or torso.Velocity.magnitude > 2 or Able == false then break end

                wait()

        end

        normal()

end



function runanim()

        RLW.Part1 = nil

        LLW.Part1 = nil

end



coroutine.resume(coroutine.create(function()

        while true do

                wait()

                if selected and Able == true then

                        if torso.Velocity.magnitude < 2 then

                                --idleanim()

                                wait()

                        else

                                --runanim()

                                wait()

                        end

                end

        end

end))



function selectanim()

        attach()

        if RAWStand == nil then

                RAWStand = RAW.C0

                LAWStand = LAW.C0

                RLWStand = RLW.C0

                LLWStand = LLW.C0

                HWStand = HW.C0

        end

        normal()

end



function deselanim()

        neck.C0 = necko

        detach(true)

end



function select(mouse)

        selectanim()

        selected = true

        mouse.KeyDown:connect(function(key)

                key = key:lower()

        end)

        mouse.Button1Down:connect(function()

        end)

end



function deselect(mouse)

        selected = false

        deselanim()

end



bin.Selected:connect(select)

bin.Deselected:connect(deselect)