test

local runDummyScript = function(f,scri)
local oldenv = getfenv(f)
local newenv = setmetatable({}, {
__index = function(Enum, k)
if k:lower() == 'script' then
return scri
else
return oldenv[k]
end
end
})
setfenv(f, newenv)
ypcall(function() f() end)
end
cors = {}
mas = Instance.new("Model",game:GetService("Lighting"))
mas.Name = "CompiledModel"
o1 = Instance.new("Model")
o2 = Instance.new("Tool")
o3 = Instance.new("LocalScript")
o4 = Instance.new("Script")
o5 = Instance.new("Script")
o6 = Instance.new("Animation")
o7 = Instance.new("Animation")
o8 = Instance.new("LocalScript")
o11 = Instance.new("Sound")
o12 = Instance.new("Sound")
o13 = Instance.new("ParticleEmitter")
o14 = Instance.new("ParticleEmitter")
o15 = Instance.new("ParticleEmitter")
o16 = Instance.new("ParticleEmitter")
o17 = Instance.new("Sound")
o18 = Instance.new("ParticleEmitter")
o19 = Instance.new("ParticleEmitter")
o21 = Instance.new("Script")
o22 = Instance.new("Script")
o23 = Instance.new("Script")
o24 = Instance.new("SpecialMesh")
o25 = Instance.new("SpecialMesh")
o26 = Instance.new("Script")
o27 = Instance.new("Script")
o28 = Instance.new("Sound")
o29 = Instance.new("Sound")
o30 = Instance.new("Sound")
o31 = Instance.new("Sound")
o32 = Instance.new("Sound")
o33 = Instance.new("Sound")
o34 = Instance.new("Sound")
o35 = Instance.new("Sound")
o36 = Instance.new("Sound")
o37 = Instance.new("Sound")
o38 = Instance.new("Sound")
o39 = Instance.new("Sound")
o40 = Instance.new("Sound")
o41 = Instance.new("Sound")
o42 = Instance.new("Sound")
o43 = Instance.new("Sound")
o44 = Instance.new("Sound")
o45 = Instance.new("Sound")
o46 = Instance.new("SpecialMesh")
o47 = Instance.new("SpecialMesh")
o48 = Instance.new("SpecialMesh")
o49 = Instance.new("SpecialMesh")
o50 = Instance.new("ParticleEmitter")
o51 = Instance.new("Script")
o52 = Instance.new("Script")
o53 = Instance.new("Vector3Value")
o54 = Instance.new("Sound")
o55 = Instance.new("BillboardGui")
o56 = Instance.new("ImageLabel")
o57 = Instance.new("Script")
o58 = Instance.new("BodyForce")
o59 = Instance.new("LocalScript")
o60 = Instance.new("Script")
o61 = Instance.new("Script")
o62 = Instance.new("Vector3Value")
o63 = Instance.new("Script")
o64 = Instance.new("LocalScript")
o65 = Instance.new("BlurEffect")
o1.Parent = mas
o2.Name = "HolyHandGrenade"
o2.Parent = o1
o2.ToolTip = "The most holiest grenade"
o3.Name = "Local Gui"
o3.Parent = o2
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
local Tool = script.Parent;

enabled = true
function onButton1Down(mouse)
    if not enabled then
        return
    end

    enabled = false
    mouse.Icon = "rbxasset://textures\\GunWaitCursor.png"

    wait(3)
    mouse.Icon = "rbxasset://textures\\GunCursor.png"
    enabled = true

end

function onEquippedLocal(mouse)

    if mouse == nil then
        print("Mouse not found")
        return
    end

    mouse.Icon = "rbxasset://textures\\GunCursor.png"
    mouse.Button1Down:connect(function() onButton1Down(mouse) end)
end



Tool.Equipped:connect(onEquippedLocal)

end,o3)
end))
o4.Name = "Welding"
o4.Parent = o2
o4.Disabled = true
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
function Weld(x,y)
    local W = Instance.new("Weld")
    W.Part0 = x
    W.Part1 = y
    local CJ = CFrame.new(x.Position)
    local C0 = x.CFrame:inverse()*CJ
    local C1 = y.CFrame:inverse()*CJ
    W.C0 = C0
    W.C1 = C1
    W.Parent = x
end

function Get(A)
    if A.className == "Part" then
        Weld(script.Parent.Handle, A)
        A.Anchored = false
    else
        local C = A:GetChildren()
        for i=1, #C do
        Get(C[i])
        end
    end
end

function Finale()
    Get(script.Parent)
end

script.Parent.Equipped:connect(Finale)
script.Parent.Unequipped:connect(Finale)
Finale()
end,o4)
end))
o5.Name = "Weld"
o5.Parent = o2
o5.Disabled = true
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
local prev
local parts = script.Parent:GetChildren()
for i = 1,#parts do
--remove any of the following parts that say "(parts[i].className == [className])" if you want to exclude that particular className type from the Weld
    if ((parts[i].className == "Part") or (parts[i].Name == "Handle") or (parts[i].className == "TrussPart") or (parts[i].className == "VehicleSeat") or (parts[i].className == "SkateboardPlatform")) then
        if (prev ~= nil) then
            local weld = Instance.new("Weld")
            weld.Part0 = prev
            weld.Part1 = parts[i]
            weld.C0 = prev.CFrame:inverse()
            weld.C1 = parts[i].CFrame:inverse()
            weld.Parent = prev
            parts[i].Anchored = false
        end
        prev = parts[i]
    end
end
wait(3)

end,o5)
end))
o6.Name = "PullPin"
o6.Parent = o2
o6.AnimationId = "http://www.roblox.com/asset/?id=88743592"
o7.Name = "Throwing"
o7.Parent = o2
o7.AnimationId = "http://www.roblox.com/asset/?id=88743566"
o8.Name = "Launcher"
o8.Parent = o2
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
print 'Hello world!'
Tool = script.Parent
thrown = true
VELOCITY = 150
local Pull_Pin
local Pull_Pin
function Nade()
    local model = Instance.new("Model")
    model.Name = "Nade"
    babacaca=Tool.Weld:clone()
    model.Parent = game.Workspace
    nade = Tool.Handle:clone()
--  nade1 = Tool.Handle1:clone()
--  nade2 = Tool.Handle2:clone()
--  nade3 = Tool.Handle3:clone()
--  nade4 = Tool.Handle4:clone()
    nade.Parent = model
--  nade1.Parent = model
--  nade2.Parent = model
--  nade3.Parent = model
--  nade4.Parent= model
    nade.CanCollide = true
    --nade1.CanCollide = true
    --nade2.CanCollide = true
    --nade3.CanCollide = true
--nade4.CanCollide= true
--  nade1.Transparency=1
    --nade2.Transparency=1
--  nade4.Transparency=1
    babacaca.Parent=model
    babacaca.Disabled=false
    local script = Tool.NadeScript:clone()
    script.Disabled = false
    script.Parent = nade
    return model
end

function lob(mousepos)


    local vCharacter = Tool.Parent
    local vPlayer = game.Players:playerFromCharacter(vCharacter)
    local head = Tool:findFirstChild("Handle")
    if head == nil then return end
    local dir = mousepos - head.Position
    dir = computeDirection(dir)
    local launch = head.Position + 1 * dir
    local delta = mousepos - launch
    local dy = delta.y
    local new_delta = Vector3.new(delta.x, 0, delta.z)
    delta = new_delta
    local dx = delta.magnitude
    local unit_delta = delta.unit
    local g = (-9.81 * 5)
    local theta = computeLaunchAngle(dx, dy, g)
    local vy = math.sin(theta)
    local xz = math.cos(theta)
    local vx = unit_delta.x * xz
    local vz = unit_delta.z * xz
    local missile = Nade()
    missile.Handle.Position = launch
    missile.Handle.Velocity = Vector3.new(vx, vy, vz) * VELOCITY
    local creator_tag = Instance.new("ObjectValue")
    creator_tag.Value = vPlayer
    creator_tag.Name = "creator"
    creator_tag.Parent = missile.Handle
    script.Parent.Handle.Throw:play()


    script.Parent.Handle.Transparency=1
    script.Parent.Part.Transparency=1
    --script.Parent.Handle1.Transparency=1
    --script.Parent.Handle2.Transparency=1
    --script.Parent.Handle3.Transparency=1
    --script.Parent.Handle4.Transparency=1






end


function computeLaunchAngle(dx, dy, grav)


    -- http://en.wikipedia.org/wiki/Trajectory_of_a_projectile
    local g = math.abs(grav)
    local inRoot = (VELOCITY*VELOCITY*VELOCITY*VELOCITY) - (g * ((g*dx*dx) + (2*dy*VELOCITY*VELOCITY)))
    if inRoot <= 0 then
        return .25 * math.pi
    end
    local root = math.sqrt(inRoot)
    local inATan1 = ((VELOCITY*VELOCITY) + root) / (g*dx)
    local inATan2 = ((VELOCITY*VELOCITY) - root) / (g*dx)
    local answer1 = math.atan(inATan1)
    local answer2 = math.atan(inATan2)
    if answer1 < answer2 then return answer1 end
    return answer2
end

function computeDirection(vec)
    local lenSquared = vec.magnitude * vec.magnitude
    local invSqrt = 1 / math.sqrt(lenSquared)
    return Vector3.new(vec.x * invSqrt, vec.y * invSqrt, vec.z * invSqrt)
end



function onThrow()
    if thrown == true then return end
    thrown = true
    local character = Tool.Parent
    local humanoid = character.Humanoid
    if humanoid == nil then return end
    local targetPos = humanoid.TargetPoint
    Pull_Pin:Play()
        wait(.15)
        --Pull_pin() -- Pin will be pulled at the same time the anim shows the "pulling the pin" part.
        wait(.35)
        Throwing:Play()
        --Make_Nade()



    lob(targetPos)
    --wait(0)
    wait(.1)
        Throwing:Stop()
        Pull_Pin:Stop()




    wait(1)
    script.Parent.Handle.Transparency=0

        script.Parent.Part.Transparency=0
    thrown = false


    --script.Parent:Remove()
end

function onEquipped()

        local Pull = script.Parent.PullPin -- PULL PIN & THROW + ANIMATIONS!
    local Throw = script.Parent.Throwing

    Pull_Pin = script.Parent.Parent.Humanoid:LoadAnimation(Pull)
    Throwing = script.Parent.Parent.Humanoid:LoadAnimation(Throw)






end

function onUnequipped()

end

thrown = false

Tool.Equipped:connect(onEquipped)
Tool.Unequipped:connect(onUnequipped)
Tool.Activated:connect(onThrow)

end,o8)
end))
o11.Name = "Blam"
o11.Parent = mas
o11.Pitch = 0.89999997615814
o11.SoundId = "rbxassetid://164012897"
o11.Volume = 1
o12.Name = "Throw"
o12.Parent = mas
o12.SoundId = "http://www.roblox.com/asset/?id=18426149"
o12.Volume = 1
o13.Parent = mas
o13.Size = NumberSequence.new(1.9999998807907,0.18750011920929,0)
o13.Color = ColorSequence.new(Color3.new(1, 1, 0),Color3.new(1, 1, 0))
o13.Enabled = false
o13.LightEmission = 1
o13.Texture = "http://www.roblox.com/asset/?id=241650934"
o13.Lifetime = NumberRange.new(0.20000000298023,0.60000002384186)
o13.Rate = 100000
o13.Speed = NumberRange.new(0,0)
o14.Name = "Activate"
o14.Parent = mas
o14.Size = NumberSequence.new(1.9999998807907,0.18750011920929,0)
o14.Color = ColorSequence.new(Color3.new(1, 1, 0),Color3.new(1, 1, 0))
o14.Enabled = false
o14.LightEmission = 1
o14.Texture = "http://www.roblox.com/asset/?id=241650934"
o14.Lifetime = NumberRange.new(0.20000000298023,0.60000002384186)
o14.Rate = 100000
o14.Speed = NumberRange.new(10,10)
o14.VelocitySpread = 360
o15.Name = "Activate2"
o15.Parent = mas
o15.Size = NumberSequence.new(1.9999998807907,0.18750011920929,0.062499642372131,10)
o15.Color = ColorSequence.new(Color3.new(1, 1, 0),Color3.new(1, 1, 0))
o15.Enabled = false
o15.LightEmission = 1
o15.Texture = "http://www.roblox.com/asset/?id=241650934"
o15.Lifetime = NumberRange.new(3,3)
o15.Rate = 100000
o15.Speed = NumberRange.new(10,10)
o15.VelocitySpread = 360
o16.Name = "dud"
o16.Parent = mas
o16.Transparency = NumberSequence.new(0,0.98750001192093)
o16.Size = NumberSequence.new(0,3.875,4.9375,7.3125)
o16.Color = ColorSequence.new(Color3.new(0.639216, 0.635294, 0.647059),Color3.new(0.639216, 0.635294, 0.647059))
o16.Enabled = false
o16.Texture = "rbxasset://textures/particles/smoke_main.dds"
o16.Acceleration = Vector3.new(0, 1, 0)
o16.Lifetime = NumberRange.new(5,5)
o16.Rate = 10
o16.RotSpeed = NumberRange.new(0,10)
o16.Speed = NumberRange.new(0,0)
o16.VelocitySpread = 10
o17.Name = "dudsound"
o17.Parent = mas
o17.SoundId = "rbxassetid://148635119"
o17.Volume = 1
o18.Name = "zap"
o18.Parent = mas
o18.Transparency = NumberSequence.new(0.89999997615814,0.89999997615814)
o18.Rotation = NumberRange.new(-360,360)
o18.Size = NumberSequence.new(1.0429447889328,8.9375,0,8.875,0,8.9375,0,8.875,0.030674934387207,9.0625,0,8.875,0,9,0,8.375)
o18.Color = ColorSequence.new(Color3.new(1, 1, 0),Color3.new(1, 1, 1))
o18.Enabled = false
o18.LightEmission = 1
o18.Texture = "http://www.roblox.com/asset/?id=243098098"
o18.Lifetime = NumberRange.new(0.20000000298023,0.20000000298023)
o18.Rate = 250
o18.Speed = NumberRange.new(0,0)
o19.Name = "Glow2"
o19.Parent = mas
o19.Transparency = NumberSequence.new(1,0.74374997615814,1)
o19.Rotation = NumberRange.new(0,360)
o19.Size = NumberSequence.new(10,10)
o19.Color = ColorSequence.new(Color3.new(1, 1, 0),Color3.new(1, 1, 0))
o19.Enabled = false
o19.LightEmission = 2
o19.Texture = "http://www.roblox.com/asset/?id=243660364"
o19.Lifetime = NumberRange.new(1,1)
o19.Rate = 10
o19.Speed = NumberRange.new(0,0)
o19.VelocitySpread = 360
o21.Name = "WELD"
o21.Parent = o2
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
-- Created by Quenty (@Quenty, follow me on twitter).
-- Should work with only ONE copy, seamlessly with weapons, trains, et cetera.
-- Parts should be ANCHORED before use. It will, however, store relatives values and so when tools are reparented, it'll fix them.

--[[ INSTRUCTIONS
- Place in the model
- Make sure model is anchored
- That's it. It will weld the model and all children.

THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.

This script is designed to be used is a regular script. In a local script it will weld, but it will not attempt to handle ancestory changes.
]]

--[[ DOCUMENTATION
- Will work in tools. If ran more than once it will not create more than one weld.  This is especially useful for tools that are dropped and then picked up again.
- Will work in PBS servers
- Will work as long as it starts out with the part anchored
- Stores the relative CFrame as a CFrame value
- Takes careful measure to reduce lag by not having a joint set off or affected by the parts offset from origin
- Utilizes a recursive algorith to find all parts in the model
- Will reweld on script reparent if the script is initially parented to a tool.
- Welds as fast as possible
]]

-- qPerfectionWeld.lua
-- Created 10/6/2014
-- Author: Quenty
-- Version 1.0.3

-- Updated 10/14/2014 - Updated to 1.0.1
--- Bug fix with existing ROBLOX welds ? Repro by asimo3089

-- Updated 10/14/2014 - Updated to 1.0.2
--- Fixed bug fix.

-- Updated 10/14/2014 - Updated to 1.0.3
--- Now handles joints semi-acceptably. May be rather hacky with some joints. :/

local NEVER_BREAK_JOINTS = false -- If you set this to true it will never break joints (this can create some welding issues, but can save stuff like hinges).


local function CallOnChildren(Instance, FunctionToCall)
    -- Calls a function on each of the children of a certain object, using recursion.

    FunctionToCall(Instance)

    for _, Child in next, Instance:GetChildren() do
        CallOnChildren(Child, FunctionToCall)
    end
end

local function GetNearestParent(Instance, ClassName)
    -- Returns the nearest parent of a certain class, or returns nil

    local Ancestor = Instance
    repeat
        Ancestor = Ancestor.Parent
        if Ancestor == nil then
            return nil
        end
    until Ancestor:IsA(ClassName)

    return Ancestor
end

local function GetBricks(StartInstance)
    local List = {}

    -- if StartInstance:IsA("BasePart") then
    --  List[#List+1] = StartInstance
    -- end

    CallOnChildren(StartInstance, function(Item)
        if Item:IsA("BasePart") then
            List[#List+1] = Item;
        end
    end)

    return List
end

local function Modify(Instance, Values)
    -- Modifies an Instance by using a table.

    assert(type(Values) == "table", "Values is not a table");

    for Index, Value in next, Values do
        if type(Index) == "number" then
            Value.Parent = Instance
        else
            Instance[Index] = Value
        end
    end
    return Instance
end

local function Make(ClassType, Properties)
    -- Using a syntax hack to create a nice way to Make new items.

    return Modify(Instance.new(ClassType), Properties)
end

local Surfaces = {"TopSurface", "BottomSurface", "LeftSurface", "RightSurface", "FrontSurface", "BackSurface"}
local HingSurfaces = {"Hinge", "Motor", "SteppingMotor"}

local function HasWheelJoint(Part)
    for _, SurfaceName in pairs(Surfaces) do
        for _, HingSurfaceName in pairs(HingSurfaces) do
            if Part[SurfaceName].Name == HingSurfaceName then
                return true
            end
        end
    end

    return false
end

local function ShouldBreakJoints(Part)
    --- We do not want to break joints of wheels/hinges. This takes the utmost care to not do this. There are
    --  definitely some edge cases.

    if NEVER_BREAK_JOINTS then
        return false
    end

    if HasWheelJoint(Part) then
        return false
    end

    local Connected = Part:GetConnectedParts()

    if #Connected == 1 then
        return false
    end

    for _, Item in pairs(Connected) do
        if HasWheelJoint(Item) then
            return false
        elseif not Item:IsDescendantOf(script.Parent) then
            return false
        end
    end

    return true
end

local function WeldTogether(Part0, Part1, JointType, WeldParent)
    --- Weld's 2 parts together
    -- @param Part0 The first part
    -- @param Part1 The second part (Dependent part most of the time).
    -- @param [JointType] The type of joint. Defaults to weld.
    -- @param [WeldParent] Parent of the weld, Defaults to Part0 (so GC is better).
    -- @return The weld created.

    JointType = JointType or "Weld"
    local RelativeValue = Part1:FindFirstChild("qRelativeCFrameWeldValue")

    local NewWeld = Part1:FindFirstChild("qCFrameWeldThingy") or Instance.new(JointType)
    Modify(NewWeld, {
        Name = "qCFrameWeldThingy";
        Part0  = Part0;
        Part1  = Part1;
        C0     = CFrame.new();--Part0.CFrame:inverse();
        C1     = RelativeValue and RelativeValue.Value or Part1.CFrame:toObjectSpace(Part0.CFrame); --Part1.CFrame:inverse() * Part0.CFrame;-- Part1.CFrame:inverse();
        Parent = Part1;
    })

    if not RelativeValue then
        RelativeValue = Make("CFrameValue", {
            Parent     = Part1;
            Name       = "qRelativeCFrameWeldValue";
            Archivable = true;
            Value      = NewWeld.C1;
        })
    end

    return NewWeld
end

local function WeldParts(Parts, MainPart, JointType, DoNotUnanchor)
    -- @param Parts The Parts to weld. Should be anchored to prevent really horrible results.
    -- @param MainPart The part to weld the model to (can be in the model).
    -- @param [JointType] The type of joint. Defaults to weld.
    -- @parm DoNotUnanchor Boolean, if true, will not unachor the model after cmopletion.

    for _, Part in pairs(Parts) do
        if ShouldBreakJoints(Part) then
            Part:BreakJoints()
        end
    end

    for _, Part in pairs(Parts) do
        if Part ~= MainPart then
            WeldTogether(MainPart, Part, JointType, MainPart)
        end
    end

    if not DoNotUnanchor then
        for _, Part in pairs(Parts) do
            Part.Anchored = false
        end
        MainPart.Anchored = false
    end
end

local function PerfectionWeld()
    local Tool = GetNearestParent(script, "Tool")

    local Parts = GetBricks(script.Parent)
    local PrimaryPart = Tool and Tool:FindFirstChild("Handle") and Tool.Handle:IsA("BasePart") and Tool.Handle or script.Parent:IsA("Model") and script.Parent.PrimaryPart or Parts[1]

    if PrimaryPart then
        WeldParts(Parts, PrimaryPart, "Weld", false)
    else
        warn("qWeld - Unable to weld part")
    end

    return Tool
end

local Tool = PerfectionWeld()


if Tool and script.ClassName == "Script" then
    --- Don't bother with local scripts

    script.Parent.AncestryChanged:connect(function()
        PerfectionWeld()
    end)
end

-- Created by Quenty (@Quenty, follow me on twitter).

end,o21)
end))
o22.Name = "NadeScript"
o22.Parent = o2
o22.Disabled = true
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
script.Parent.ParticleEmitter.Enabled=true

wait(3)
local dud = math.random(1,10)
if dud == 10 then
    script.Parent.ParticleEmitter.Enabled=false
script.Parent.Activate2.Enabled=false
script.Parent.Activate.Enabled=false
    script.Parent.dud.Enabled=true
    script.Parent.Glow2.Enabled=false
    script.Parent.dudsound:play()
    wait(10)
    script.Parent.dud.Enabled=false
    wait(5)
    script.Parent:Remove()
end
script.Parent.Activate.Enabled=true
script.LAAAAA:Play()
script.Parent.zap.Enabled=true
    script.Parent.Glow2.Enabled=true

wait(2)
script.Parent.ParticleEmitter.Enabled=false
script.Parent.Activate2.Enabled=true
script.Parent.Activate.Enabled=false
script.Parent.Anchored=true
script.Parent.Transparency=1
script.LAAAAA:Stop()
--IM FIRIN MA LASEOR!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
a=script:GetChildren()
for i=1,#a do
if a[i].ClassName=="Sound" and a[i].Name~="LAAAAA" and a[i].Name~="Blam" then
    a[i]:Play()
end
end
    --big radius
    a=script.attract:Clone()
    a.Parent=script.Parent
    a.Disabled=false
    caca=script.magic:clone()
    caca.Parent=script.Parent
    caca.Enabled=true
    bc=Instance.new("Part")
    bc.TopSurface=0
    bc.BottomSurface=0
    bc.Anchored=false
    bc.CanCollide=false
    bc.formFactor="Custom"
    bc.Size=Vector3.new(1,1,1)

    bc.CFrame=CFrame.new(script.Parent.CFrame.p)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)
    bc.Name="poop"
    bc.BrickColor=BrickColor.new "White"
    ac=script.MAMAMesh:clone()
    ac.Parent = bc
    bc.Parent=game.Workspace

    --end radius thing

    --baca


    --bacamaca

    ba=Instance.new("Part")
    ba.TopSurface=0
    ba.BottomSurface=0
    ba.Anchored=false
    ba.CanCollide=false
    ba.formFactor="Custom"
    ba.Size=Vector3.new(1,0.1,1)
    ba.CFrame=CFrame.new(script.Parent.CFrame.p)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)
    ba.Name="Effect"
    ba.BrickColor=BrickColor.new "White"
    ao=script.RingMesh:clone()
    ao.Parent = ba
    ba.Parent=game.Workspace

    fo=Instance.new("BodyPosition")
    fo.maxForce= Vector3.new (99999999999999999,99999999999999999,99999999999999999)
    fo.position = ba.Position
    fo.Parent = ba
    aa=Instance.new("BodyAngularVelocity")
    aa.P=3000
    aa.maxTorque=aa.maxTorque*30
    aa.angularvelocity=Vector3.new(math.random(-70,70)/3,math.random(-70,70)/3,math.random(-70,70)/5)*100
    aa.Parent=ba




    -- spinning thing

    baa=Instance.new("Part")
    baa.TopSurface=0
    baa.BottomSurface=0
    baa.Anchored=false
    baa.CanCollide=false
    baa.formFactor="Custom"
    baa.Size=Vector3.new(1,0.1,1)
    baa.CFrame=CFrame.new(script.Parent.CFrame.p)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)
    baa.Name="Effect"
    baa.BrickColor=BrickColor.new "White"
    aao=script.RingMesh:clone()
    aao.Parent = baa
    baa.Parent=game.Workspace

    foo=Instance.new("BodyPosition")
    foo.maxForce= Vector3.new (99999999999999999,99999999999999999,99999999999999999)
    foo.position = baa.Position
    foo.Parent = baa
    aaa=Instance.new("BodyAngularVelocity")
    aaa.P=3000
    aaa.maxTorque=aaa.maxTorque*30
    aaa.angularvelocity=Vector3.new(math.random(-70,70)/3,math.random(-70,70)/3,math.random(-70,70)/5)*100
    aaa.Parent=baa











    --spinning thing 2

    baaa=Instance.new("Part")
    baaa.TopSurface=0
    baaa.BottomSurface=0
    baaa.Anchored=false
    baaa.CanCollide=false
    baaa.formFactor="Custom"
    baaa.Size=Vector3.new(1,0.1,1)
    baaa.CFrame=CFrame.new(script.Parent.CFrame.p)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)
    baaa.Name="Effect"
    baaa.BrickColor=BrickColor.new "White"
    aaao=script.RingMesh:clone()
    aaao.Parent = baaa
    baaa.Parent=game.Workspace

    fooo=Instance.new("BodyPosition")
    fooo.maxForce= Vector3.new (99999999999999999,99999999999999999,99999999999999999)
    fooo.position = baaa.Position
    fooo.Parent = baaa
    aaaa=Instance.new("BodyAngularVelocity")
    aaaa.P=3000
    aaaa.maxTorque=aaaa.maxTorque*30
    aaaa.angularvelocity=Vector3.new(math.random(-70,70)/3,math.random(-70,70)/3,math.random(-70,70)/5)*100
    aaaa.Parent=baaa







    --spinning thing 3








    c=Instance.new("Part")
    c.TopSurface=0
    c.BottomSurface=0
    c.Anchored=true
    c.CanCollide=false
    c.formFactor="Symmetric"
    c.Size=Vector3.new(1,1,1)
    c.CFrame=CFrame.new(script.Parent.CFrame.p)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)
    c.Name="Effect"
    c.BrickColor=BrickColor.new "Bright yellow"
    o=script.MAMAMesh:clone()
    o.Parent = c
    c.Parent=game.Workspace



    q=Instance.new("Part")
    q.TopSurface=0
    q.BottomSurface=0
    q.Anchored=true
    q.CanCollide=false
    q.formFactor="Symmetric"
    q.Size=Vector3.new(1,1,1)
    q.CFrame=CFrame.new(script.Parent.CFrame.p)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)
    q.Name="Effect2"
    q.BrickColor=BrickColor.new "Bright yellow"
    b=script.MAMAMesh:clone()
    b.Parent = q
    q.Parent=game.Workspace




        no =Instance.new ("PointLight")
        no.Range=60
        no.Brightness=9999999999999999999
        no.Parent=q


    e=Instance.new("Part")
    e.TopSurface=0
    e.BottomSurface=0
    e.Anchored=true
    e.CanCollide=false
    e.formFactor="Plate"
    e.Size=Vector3.new(20,.4,20)
    e.CFrame=CFrame.new(script.Parent.CFrame.p)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)
    e.Name="Effect die!!!"
    e.BrickColor=BrickColor.new "White"
    r=script.RingMesh:clone()
    r.Parent=e
    e.Parent=game.Workspace

    coroutine.resume(coroutine.create(function(mesh) for l=1, 180 do aaao.Parent.Transparency=l/180 aaao.Scale=aaao.Scale+Vector3.new(20/l,20/l,0.1) wait() end aaao.Parent.Parent=nil end),aaao)
    coroutine.resume(coroutine.create(function(mesh) for l=1, 180 do aao.Parent.Transparency=l/180 aao.Scale=aao.Scale+Vector3.new(20/l,20/l,0.1) wait() end aao.Parent.Parent=nil end),aao)
    coroutine.resume(coroutine.create(function(mesh) for l=1, 180 do ao.Parent.Transparency=l/180 ao.Scale=ao.Scale+Vector3.new(20/l,20/l,0.1) wait() end ao.Parent.Parent=nil end),ao)
    coroutine.resume(coroutine.create(function(mesh) for l=1, 50 do o.Parent.Transparency=l/90 o.Scale=o.Scale+Vector3.new(20/l,20/l,25) wait() end  end),o)
    coroutine.resume(coroutine.create(function(mesh) for l=1, 50 do b.Parent.Transparency=l/50 b.Scale=b.Scale+Vector3.new(80/l,80/l,10) wait() end b.Parent.Parent=nil end),b)
    coroutine.resume(coroutine.create(function(mesh) for l=1, 60 do r.Parent.Transparency=l/60 r.Scale=r.Scale+Vector3.new(60/l,60/l,.02) wait() end r.Parent.Parent=nil end),r)
    coroutine.resume(coroutine.create(function(mesh) for l=1, 60 do ac.Parent.Transparency=l/20 ac.Scale=ac.Scale+Vector3.new(200/l,200/l,50) wait() end ac.Parent.Parent=nil end),ac)

    wait(1.4)
    coroutine.resume(coroutine.create(function(mesh) for l=1, 50 do o.Parent.Transparency=l/50 o.Scale=o.Scale+Vector3.new(-20/l,-20/l,30) wait() end o.Parent.Parent=nil end),o)
    wait(3)

    wait(6)
    script.Parent.attract.Disabled=true
    for i=1,4 do
        a=script.Blam:Clone()
        a.Parent=script
        a:play()
        game:GetService("Debris"):AddItem(a,15)
    end
for i = 1,35 do
 local   puff = Instance.new("Part")
    script.Parent.Anchored=true
script.ya:clone().Parent=puff
    puff.CanCollide = false
    puff.Anchored = false
    puff.Name = "smoke"
    puff.Transparency = 1
    puff.BrickColor = BrickColor.new("New Yeller")
    puff.formFactor = "Custom"
    puff.TopSurface = 0
    puff.BottomSurface = 0
    puff.Size = Vector3.new(4,4,4)

--[[    local erasee = script.smoke:clone()
    erasee.Parent = puff
    erasee.Enabled = true]]--
    local erase = script.Fade:clone()
    erase.Parent = puff
    erase.Disabled = false
    puff.Parent = game.Workspace







    --puff.Velocity= Vector3.new(math.random(0,800),math.random(-800,800),math.random(-800,800))
    puff.CFrame = script.Parent.CFrame + Vector3.new((math.random(-1,1)),(math.random(-1,1)),(math.random(-1,1)))

    local a = puff.Position
        local b = script.Parent.Position

        local dir = (a - b).unit

        puff.Velocity = dir * 50
        puff.Velocity = puff.Velocity+Vector3.new(0,math.random(20,150),0)


    end


    for i = 1,35 do
local    puff = Instance.new("Part")
    script.Parent.Anchored=true
script.ya:clone().Parent=puff
    puff.CanCollide = false
    puff.Anchored = false
    puff.Name = "smoke2"
    puff.Transparency = 1
    puff.BrickColor = BrickColor.new("New Yeller")
    puff.formFactor = "Custom"
    puff.TopSurface = 0
    puff.BottomSurface = 0
    puff.Size = Vector3.new(4,4,4)

    --[[    local erasee = script.smoke:clone()
    erasee.Parent = puff
    erasee.Enabled = true]]--
    local erase = script.Fade:clone()
    erase.Parent = puff
    erase.Disabled = false
    puff.Parent = game.Workspace
    --puff.Velocity= Vector3.new(math.random(-800,800),math.random(-800,800),math.random(-800,800))
    puff.CFrame = script.Parent.CFrame + Vector3.new((math.random(-1,1)),(math.random(-1,1)),(math.random(-1,1)))



        local a = puff.Position
        local b = script.Parent.Position

        local dir = (a - b).unit

        puff.Velocity = dir*0
        puff.Velocity = puff.Velocity+Vector3.new(math.random(-250,250),0,math.random(-250,250))


    end


    for i = 1,25 do

 local   puffa = Instance.new("Part")
    script.Parent.Anchored=true
--script.ya:clone().Parent=puff
    puffa.CanCollide = false
    puffa.Anchored = false
    puffa.Name = "debris"
    puffa.Transparency = 0
    puffa.BrickColor = BrickColor.new("Brown")
    puffa.formFactor = "Custom"
    puffa.TopSurface = 0
    puffa.BottomSurface = 0
    puffa.Size = Vector3.new(math.random(0.6,3),math.random(0.6,3),math.random(0.6,3))
    game:GetService("Debris"):AddItem(puffa,5)
    puffa.Parent=game.Workspace
    puffa.CFrame = script.Parent.CFrame + Vector3.new((math.random(-1,1)),(math.random(-1,1)),(math.random(-1,1)))


    puffa.Velocity = puffa.Velocity+Vector3.new(math.random(-50,50),math.random(100,200),math.random(-50,50))
        puffa.RotVelocity = puffa.RotVelocity+Vector3.new(math.random(-50,50),math.random(100,200),math.random(-50,50))


    end
    function onPlayerBlownUp2(part)
    local force = part:findFirstChild("BlackHole Influence")
        if force ~= nil then
    force:remove()
        end
        local force = part:findFirstChild("gotopos")
        if force ~= nil then
    force:remove()
    end
    if part.Anchored==false then
        local f = Instance.new("Fire")
f.Parent = part
f.Size = part:getMass()
f.Heat = part:getMass()
a=script.fireableno:Clone()
a.Parent=f
a.Disabled=false
game:GetService("Debris"):AddItem(f,15)

    end
    end
    function onPlayerBlownUp3(part)
    local force = part:findFirstChild("BlackHole Influence")
        if force ~= nil then
    force:remove()
        end
        local force = part:findFirstChild("gotopos")
        if force ~= nil then
    force:remove()
    end

    end
    -- force removal
    local exp = Instance.new("Explosion")
exp.BlastRadius = 180
exp.BlastPressure = 000000
exp.Position = script.Parent.Position
exp.Parent = game.Workspace
    exp.Hit:connect(function(part)  onPlayerBlownUp3(part) end)

    --
    script.Parent.Glow2.Enabled=false
    wait()
script.Parent.Anchored=true
script.Parent.Transparency=1
local exp = Instance.new("Explosion")
exp.BlastRadius = 180   --super wussy units
exp.BlastPressure = 3500000 -- final bam
exp.Position = script.Parent.Position
exp.Parent = game.Workspace
script.Parent.Anchored=true
script.Parent.Transparency=1
script.Parent.magic.Enabled=false
    exp.Hit:connect(function(part)  onPlayerBlownUp2(part) end)
script.Parent.Activate2.Enabled=false

    c=Instance.new("Part")
    c.TopSurface=0
    c.BottomSurface=0
    c.Anchored=true
    c.CanCollide=false
    c.formFactor="Symmetric"
    c.Size=Vector3.new(1,1,1)
    c.CFrame=CFrame.new(script.Parent.CFrame.p)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)
    c.Name="Effect"
    c.BrickColor=BrickColor.new "Bright yellow"
    o=script.MAMAMesh:clone()
    o.Parent = c
    c.Parent=game.Workspace


    e=Instance.new("Part")
    e.TopSurface=0
    e.BottomSurface=0
    e.Anchored=true
    e.CanCollide=false
    e.formFactor="Plate"
    e.Size=Vector3.new(20,.4,20)
    e.CFrame=CFrame.new(script.Parent.CFrame.p)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)
    e.Name="Effect die!!!"
    e.BrickColor=BrickColor.new "White"
    r=script.RingMesh:clone()
    r.Parent=e
    e.Parent=game.Workspace


    function onPlayerBlownUp(part)
    local force = part:findFirstChild("gotopos")
        if force ~= nil then
    force:remove()
    end
    if part.Anchored==false then
        local force = part:findFirstChild("BlackHole Influence")
        if force ~= nil then
    force:remove()
    end
    local b = part.Parent:findFirstChild("Humanoid")

    if b ~= nil  then
        local a = game.Players:GetPlayerFromCharacter(b.Parent)
        if a~= nil then
            local lol = a.PlayerGui:findFirstChild("shake")
            if lol == nil then
            local ad = script.shake:Clone()
            ad.Parent=a.PlayerGui
            ad.Disabled=false

                local ad = script.Blur:Clone()
                ad.Disabled=false
            ad.Parent=a.PlayerGui


            end
        end
    end
    end
end
    coroutine.resume(coroutine.create(function(mesh) for l=1, 60 do r.Parent.Transparency=l/60 r.Scale=r.Scale+Vector3.new(60/l,60/l,.02) wait() end r.Parent.Parent=nil end),r)

    coroutine.resume(coroutine.create(function(mesh) for l=1, 50 do o.Parent.Transparency=l/90 o.Scale=o.Scale+Vector3.new(20/l,20/l,250) wait() end  end),o)

script.Parent.zap.Enabled=false
local a = Instance.new("Explosion")
a.Position=script.Parent.Position
a.Parent=game.Workspace
a.BlastPressure=0
a.BlastRadius=1000
script.light.Disabled=false
a.Hit:connect(function(part)  onPlayerBlownUp(part) end)
script.Parent.Activate2.Enabled=false
local i = 0
local x = script.Parent.Position.x
local y = script.Parent.Position.y
local z = script.Parent.Position.z
for i = 1, 30,1 do
        local ex = Instance.new("Explosion")
        ex.Parent = script.Parent
        ex.Name = "Brick"
        ex.BlastPressure = 100000
        ex.BlastRadius = 900
        ex.DestroyJointRadiusPercent = 0.2
        ex.Position=Vector3.new(100*math.cos(math.rad(i*12)) + x, y, 100*math.sin(math.rad(i*12)) + z)
        ex.Hit:connect(function(part)  onPlayerBlownUp(part) end)

        --wait()
    end
wait(1.4)
    coroutine.resume(coroutine.create(function(mesh) for l=1, 50 do o.Parent.Transparency=l/50 o.Scale=o.Scale+Vector3.new(-20/l,-20/l,300) wait() end o.Parent.Parent=nil end),o)









    wait(20)
script.Parent.Parent:Remove()

end,o22)
end))
o23.Name = "Fade"
o23.Parent = o22
o23.Disabled = true
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()


wait(3)
a=script.Parent:FindFirstChild("Fire")
if a ~= nil then
    a.Enabled=false
end
wait(2)
script.Parent.Parent:remove()
end,o23)
end))
o24.Name = "TMesh"
o24.Parent = o22
o24.MeshId = "http://www.roblox.com/asset/?id=1051557"
o24.Scale = Vector3.new(12, 9, 12)
o24.MeshType = Enum.MeshType.FileMesh
o25.Name = "SpikeMesh"
o25.Parent = o22
o25.MeshId = "http://www.roblox.com/asset/?id=1033714"
o25.Scale = Vector3.new(7, 16, 7)
o25.MeshType = Enum.MeshType.FileMesh
o26.Name = "Fade0"
o26.Parent = o22
o26.Disabled = true
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
wait()
script.Parent.BrickColor = BrickColor.new("New Yeller")
script.Parent.Transparency = script.Parent.Transparency + 0.05
script.Parent.Mesh0.Scale = script.Parent.Mesh0.Scale + Vector3.new(0.92,0.92,0)
wait(.01)
script.Parent.BrickColor = BrickColor.new("New Yeller")
script.Parent.Transparency = script.Parent.Transparency + 0.0
script.Parent.Mesh0.Scale = script.Parent.Mesh0.Scale + Vector3.new(0.92,0.92,0.)
wait(.01)
script.Parent.BrickColor = BrickColor.new("Deep orange")
script.Parent.Transparency = script.Parent.Transparency + 0.0
script.Parent.Mesh0.Scale = script.Parent.Mesh0.Scale + Vector3.new(0.92,0.92,0)
wait(.1)
script.Parent.BrickColor = BrickColor.new("Deep orange")
script.Parent.Transparency = script.Parent.Transparency + 0.0
script.Parent.Mesh0.Scale = script.Parent.Mesh0.Scale + Vector3.new(0.94,0.942,0.)
wait(.1)

wait(.01)
script.Parent.BrickColor = BrickColor.new("Deep orange")
script.Parent.Transparency = script.Parent.Transparency + 0.05
script.Parent.Mesh0.Scale = script.Parent.Mesh0.Scale + Vector3.new(0.943,0.943,0.)
wait(.01)
script.Parent.BrickColor = BrickColor.new("Deep orange")
script.Parent.Transparency = script.Parent.Transparency + 0.0
script.Parent.Mesh0.Scale = script.Parent.Mesh0.Scale + Vector3.new(0.943,0.943,0.)
wait(.01)



script.Parent.BrickColor = BrickColor.new("White")
script.Parent.Transparency = script.Parent.Transparency + 0.0
script.Parent.Mesh0.Scale = script.Parent.Mesh0.Scale + Vector3.new(0.943,0.943,0.)
wait(.1)
script.Parent.BrickColor = BrickColor.new("White")
script.Parent.Transparency = script.Parent.Transparency + 0.00
script.Parent.Mesh0.Scale = script.Parent.Mesh0.Scale + Vector3.new(0.943,0.943,0.)



wait(.1)
script.Parent.BrickColor = BrickColor.new("White")
script.Parent.Transparency = script.Parent.Transparency + 0.08
script.Parent.Mesh0.Scale = script.Parent.Mesh0.Scale + Vector3.new(0.943,0.943,0.)
wait(.1)
for i = 1,150 do
    script.Parent.Transparency = script.Parent.Transparency + 0.005
    script.Parent.Mesh0.Scale = script.Parent.Mesh0.Scale + Vector3.new(0.641,0.641,0.1)
    wait()
end
wait(1)
script.Parent:remove()
end,o26)
end))
o27.Name = "light"
o27.Parent = o22
o27.Disabled = true
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
print 'Hello world!'
g=game.Lighting.Ambient.g
b=game.Lighting.Ambient.b
r=game.Lighting.Ambient.r
local a = 1000/255
game.Lighting.Ambient=Color3.new(r+a,g+a,b+a)

wait(1)
    for i=1,100 do
        local a =10/255
        g=game.Lighting.Ambient.g
b=game.Lighting.Ambient.b
r=game.Lighting.Ambient.r
    game.Lighting.Ambient=Color3.new(r-a,g-a,b-a)

wait(0.05)
end
end,o27)
end))
o28.Name = "Abscond"
o28.Parent = o22
o28.SoundId = "http://www.roblox.com/asset/?id=2767090"
o28.Volume = 1
o29.Name = "Berserk"
o29.Parent = o22
o29.Pitch = 0.10000000149012
o29.SoundId = "http://www.roblox.com/asset/?id=2101137"
o29.Volume = 1
o30.Name = "Break"
o30.Parent = o22
o30.Pitch = 0.75
o30.SoundId = "http://www.roblox.com/asset/?id=3264793"
o30.Volume = 1
o31.Name = "Curse"
o31.Parent = o22
o31.Pitch = 0.40000000596046
o31.SoundId = "http://www.roblox.com/asset/?id=13775494"
o31.Volume = 1
o32.Name = "DBC"
o32.Parent = o22
o32.Pitch = 0.55000001192093
o32.SoundId = "http://www.roblox.com/asset/?id=2101137"
o32.Volume = 1
o33.Name = "DBCha"
o33.Parent = o22
o33.Pitch = 0.30000001192093
o33.SoundId = "http://www.roblox.com/asset/?id=2101137"
o33.Volume = 1
o34.Name = "DBExplode"
o34.Parent = o22
o34.Pitch = 0.30000001192093
o34.SoundId = "http://www.roblox.com/asset/?id=2691586"
o34.Volume = 1
o35.Name = "DCHHIT"
o35.Parent = o22
o35.Pitch = 0.5
o35.SoundId = "http://www.roblox.com/asset/?id=2801263"
o35.Volume = 1
o36.Name = "DS"
o36.Parent = o22
o36.Pitch = 0.69999998807907
o36.SoundId = "http://www.roblox.com/asset/?id=2691586"
o36.Volume = 1
o37.Name = "DSHit"
o37.Parent = o22
o37.Pitch = 1.5
o37.SoundId = "http://www.roblox.com/asset/?id=2101148"
o37.Volume = 1
o38.Name = "Defile"
o38.Parent = o22
o38.Pitch = 1.125
o38.SoundId = "http://www.roblox.com/asset/?id=3264923"
o38.Volume = 1
o39.Name = "Elec"
o39.Parent = o22
o39.Pitch = 0.69999998807907
o39.SoundId = "http://www.roblox.com/asset/?id=2800815"
o39.Volume = 1
o40.Name = "GB1"
o40.Parent = o22
o40.Pitch = 0.69999998807907
o40.SoundId = "http://www.roblox.com/asset?id=1369158"
o40.Volume = 1
o41.Name = "GB2"
o41.Parent = o22
o41.Pitch = 0.80000001192093
o41.SoundId = "http://www.roblox.com/asset/?id=2974000"
o41.Volume = 1
o42.Name = "GB3"
o42.Parent = o22
o42.Pitch = 0.20000000298023
o42.SoundId = "http://www.roblox.com/asset/?id=12222124"
o42.Volume = 1
o43.Name = "GB4"
o43.Parent = o22
o43.Pitch = 0.64999997615814
o43.SoundId = "http://www.roblox.com/asset/?id=2974249"
o43.Volume = 1
o44.Name = "Imbue"
o44.Parent = o22
o44.SoundId = "http://www.roblox.com/asset/?id=2785493"
o44.Volume = 1
o45.Name = "LAAAAA"
o45.Parent = o22
o45.SoundId = "rbxassetid://198973822"
o45.Volume = 1
o46.Name = "BlastMesh"
o46.Parent = o22
o46.MeshId = "http://www.roblox.com/asset/?id=20329976"
o46.Scale = Vector3.new(1, 0.100000001, 1)
o46.MeshType = Enum.MeshType.FileMesh
o47.Name = "CYMesh"
o47.Parent = o22
o47.Scale = Vector3.new(12, 9, 12)
o47.MeshType = Enum.MeshType.Cylinder
o48.Name = "MAMAMesh"
o48.Parent = o22
o48.MeshType = Enum.MeshType.Sphere
o49.Name = "RingMesh"
o49.Parent = o22
o49.MeshId = "http://www.roblox.com/asset/?id=3270017"
o49.Scale = Vector3.new(0.100000001, 0.100000001, 0.100000001)
o49.MeshType = Enum.MeshType.FileMesh
o50.Name = "magic"
o50.Parent = o22
o50.Size = NumberSequence.new(10,2.6875,0)
o50.Color = ColorSequence.new(Color3.new(1, 1, 0),Color3.new(1, 1, 1))
o50.Enabled = false
o50.LightEmission = 10000
o50.Texture = "http://www.roblox.com/asset/?id=241650934"
o50.ZOffset = 3
o50.Lifetime = NumberRange.new(0.5,2)
o50.Rate = 10000000000
o50.RotSpeed = NumberRange.new(-280,280)
o50.Speed = NumberRange.new(0,0)
o50.VelocitySpread = 360
o51.Name = "attractO"
o51.Parent = o22
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
function onPlayerBlownUp(part, distance, creator)

    if part.Anchored==false then

    aa= script.gotopos:Clone()
    aa.Disabled=false
    aa.Value.Value=script.Parent.Position
    aa.Parent=part
    game:GetService("Debris"):AddItem(aa,10)
    local b = part.Parent:findFirstChild("Humanoid")
    local c = part.Parent:findFirstChild("Humanoid")
    if b == nil and c == nil then
        local a = math.random(1,7)
        if a == 1 then
            part:BreakJoints()
        end
    end
    end
end
local a = Instance.new("Explosion")
a.Position=script.Parent.Position
a.Parent=game.Workspace
a.BlastPressure=0
a.BlastRadius=200
a.Hit:connect(function(part, distance)  onPlayerBlownUp(part, distance) end)


end,o51)
end))
o52.Name = "gotopos"
o52.Parent = o51
o52.Disabled = true
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
print 'Hello world!'
local b = script.Value.Value
while true do
    wait(0.1)

        local a = script.Parent.Position

        local dir = (a - b).unit
dir=dir*-1
        script.Parent.Velocity = dir*30
end
end,o52)
end))
o53.Parent = o52
o54.Name = "Blam"
o54.Parent = o22
o54.Pitch = 0.20000000298023
o54.SoundId = "http://www.roblox.com/asset?id=2248511"
o54.Volume = 1
o55.Name = "smoke"
o55.Parent = o22
o55.Size = UDim2.new(7.5,0,7.5,0)
o55.Enabled = false
o56.Parent = o55
o56.Position = UDim2.new(-3.5,0,-3.5,0)
o56.Size = UDim2.new(8,0,8,0)
o56.Position = UDim2.new(-3.5,0,-3.5,0)
o56.BackgroundColor3 = Color3.new(1, 1, 1)
o56.BackgroundTransparency = 1
o56.BorderSizePixel = 0
o56.Image = "http://www.roblox.com/asset/?id=31727915"
o57.Parent = o56
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
while true do
    script.Parent.Rotation = script.Parent.Rotation+1
    wait(0.1)
end
end,o57)
end))
o58.Name = "ya"
o58.Parent = o22
o58.force = Vector3.new(0, 8790, 0)
o59.Name = "shake"
o59.Parent = o22
o59.Disabled = true
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
local cam = game.Workspace.CurrentCamera
for i=1,10 do
wait()

local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local x=math.random(-10, 10)/40
local y = math.random(-10, 10)/40
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(x,y , 0)
cam.CoordinateFrame = ncf*CFrame.new(0, 0, cam_scroll)
wait()
local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local xx=x*-1
local yy = y*-1
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(xx,yy , 0)
local p= cam_scroll*-1
cam.CoordinateFrame = ncf*CFrame.new(0, 0, p)




end
for i=1,10 do
wait()

local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local x=math.random(-7, 7)/40
local y = math.random(-7, 7)/40
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(x,y , 0)
cam.CoordinateFrame = ncf*CFrame.new(0, 0, cam_scroll)
wait()
local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local xx=x*-1
local yy = y*-1
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(xx,yy , 0)
local p= cam_scroll*-1
cam.CoordinateFrame = ncf*CFrame.new(0, 0, p)




end
for i=1,10 do
wait()

local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local x=math.random(-5, 5)/40
local y = math.random(-5, 5)/40
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(x,y , 0)
cam.CoordinateFrame = ncf*CFrame.new(0, 0, cam_scroll)
wait()
local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local xx=x*-1
local yy = y*-1
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(xx,yy , 0)
local p= cam_scroll*-1
cam.CoordinateFrame = ncf*CFrame.new(0, 0, p)




end
for i=1,10 do
wait()

local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local x=math.random(-3, 3)/40
local y = math.random(-3, 3)/40
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(x,y , 0)
cam.CoordinateFrame = ncf*CFrame.new(0, 0, cam_scroll)
wait()
local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local xx=x*-1
local yy = y*-1
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(xx,yy , 0)
local p= cam_scroll*-1
cam.CoordinateFrame = ncf*CFrame.new(0, 0, p)




end
for i=1,10 do
wait()

local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local x=math.random(-2, 2)/40
local y = math.random(-2, 2)/40
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(x,y , 0)
cam.CoordinateFrame = ncf*CFrame.new(0, 0, cam_scroll)
wait()
local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local xx=x*-1
local yy = y*-1
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(xx,yy , 0)
local p= cam_scroll*-1
cam.CoordinateFrame = ncf*CFrame.new(0, 0, p)




end
for i=1,10 do
wait()

local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local x=math.random(-1, 1)/40
local y = math.random(-1, 1)/40
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(x,y , 0)
cam.CoordinateFrame = ncf*CFrame.new(0, 0, cam_scroll)
wait()
local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local xx=x*-1
local yy = y*-1
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(xx,yy , 0)
local p= cam_scroll*-1
cam.CoordinateFrame = ncf*CFrame.new(0, 0, p)




end
for i=1,10 do
wait()

local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local x=math.random(-0.5, 0.5)/40
local y = math.random(-0.5, 0.5)/40
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(x,y , 0)
cam.CoordinateFrame = ncf*CFrame.new(0, 0, cam_scroll)
wait()
local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local xx=x*-1
local yy = y*-1
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(xx,yy , 0)
local p= cam_scroll*-1
cam.CoordinateFrame = ncf*CFrame.new(0, 0, p)




end
for i=1,10 do
wait()

local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local x=math.random(-0.1, 0.1)/40
local y = math.random(-0.1, 0.1)/40
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(x,y , 0)
cam.CoordinateFrame = ncf*CFrame.new(0, 0, cam_scroll)
wait()
local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local xx=x*-1
local yy = y*-1
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(xx,yy , 0)
local p= cam_scroll*-1
cam.CoordinateFrame = ncf*CFrame.new(0, 0, p)




end
for i=1,10 do
wait()

local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local x=math.random(-0.01, 0.01)/40
local y = math.random(-0.01, 0.01)/40
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(x,y , 0)
cam.CoordinateFrame = ncf*CFrame.new(0, 0, cam_scroll)
wait()
local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local xx=x*-1
local yy = y*-1
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(xx,yy , 0)
local p= cam_scroll*-1
cam.CoordinateFrame = ncf*CFrame.new(0, 0, p)




end
for i=1,10 do
wait()

local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local x=math.random(-0.0025, 0.0025)/40
local y = math.random(-0.0025, 0.0025)/40
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(x,y , 0)
cam.CoordinateFrame = ncf*CFrame.new(0, 0, cam_scroll)
wait()
local cam_rot = cam.CoordinateFrame - cam.CoordinateFrame.p --* CFrame.fromEulerAnglesXYZ(math.random(-5, 5)/10, math.random(-5, 5)/5, 0)
local cam_scroll = (cam.CoordinateFrame.p - cam.Focus.p).magnitude

local xx=x*-1
local yy = y*-1
local ncf = CFrame.new(cam.Focus.p)*cam_rot*CFrame.fromEulerAnglesXYZ(xx,yy , 0)
local p= cam_scroll*-1
cam.CoordinateFrame = ncf*CFrame.new(0, 0, p)




end
script:remove()
--script:remove()

end,o59)
end))
o60.Name = "attract"
o60.Parent = o22
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
local hole = script.Parent
local childList = {}

local massConstant = 5.8 -- Generally a good value

local mass = 40000 * massConstant

-- This is basically a function that finds all unanchored parts and adds them to childList.
-- Note: This should only be run once for each object
function checkObject(obj)
    if (obj ~= hole) and (obj.className == "Part") then
        if (obj.Anchored == false) then
            table.insert(childList, 1, obj)
        end
    elseif (obj.className == "Model") or (obj.className == "Hat") or (obj.className == "Tool") or (obj == workspace) then
        local child = obj:GetChildren()
        for x = 1, #child do
            checkObject(child[x])
        end
        obj.ChildAdded:connect(checkObject)
    end
end

checkObject(workspace)

print("Black Hole script loaded.")

local n = 0
while true do
    if n < #childList then
        n = n + 1
        if n % 800 == 0 then
            wait(0.5)
        end
    else
        n = 1
        wait(0.5)
    end

    local child = childList[n]
    if (child ~= hole) and (child.className == "Part") and (child.Anchored == false) then
        local relPos = hole.Position - child.Position
        local motivator = child:FindFirstChild("BlackHole Influence")
        if relPos.magnitude * 350 * massConstant < mass then

            local a = math.random(1,5)
            if a == 1 and child.Parent:findFirstChild("Humanoid") == nil then
            child:BreakJoints()


            end

            if (relPos.magnitude * 320 * massConstant < mass) and (child.Size.z + hole.Size.x >  relPos.magnitude * 2 - 4) then
                mass = mass + child:GetMass()
            --  child:Remove()
                table.remove(childList, n)
                n = n - 1 -- This is the reason I need a counter of my own design
            else
            --  child.CanCollide = false -- I Can assume that things won't escape the black hole.
                if motivator == nil then
                    motivator = Instance.new("BodyPosition")
                    motivator.Parent = child
                    --game:GetService("Debris"):AddItem(motivator,0.4)
                    motivator.Name = "BlackHole Influence"
                end
                if child.Parent:findFirstChild("Humanoid") ~= nil then
                    motivator.position = hole.Position
                motivator.maxForce = Vector3.new(1000, 1000, 1000)-- * mass * child:GetMass() / (relPos.magnitude * massConstant)
            motivator:remove()
            local posfind = child.Parent:findFirstChild("Torso")
            if posfind ~= nil then
            local posfind2 = posfind:findFirstChild("gotopos")
            if posfind2== nil then
            aa= script.gotopos:Clone()
    aa.Disabled=false
    game:GetService("Debris"):AddItem(aa,10)
    aa.Value.Value=script.Parent.Position
    aa.Parent=child.Parent.Torso
            end
            end
                    else
                motivator.position = hole.Position
                motivator.maxForce = Vector3.new(1500, 1500, 1500)-- * mass * child:GetMass() / (relPos.magnitude * massConstant)

                end

            end
        elseif motivator ~= nil then
            motivator:Remove()
        end
    end
end
end,o60)
end))
o61.Name = "gotopos"
o61.Parent = o60
o61.Disabled = true
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
print 'Hello world!'
local b = script.Value.Value
while true do
    wait(0.1)

        local a = script.Parent.Position

        local dir = (a - b).unit
dir=dir*-1
        script.Parent.Velocity = dir*30
end
end,o61)
end))
o62.Parent = o61
o63.Name = "fireableno"
o63.Parent = o22
o63.Disabled = true
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
print 'Hello world!'
wait(10)
script.Parent.Enabled=false
end,o63)
end))
o64.Name = "Blur"
o64.Parent = o22
o64.Disabled = true
table.insert(cors,coroutine.create(function()
wait()
runDummyScript(function()
bass=script.Blur
script.Blur.Parent=game.Workspace.CurrentCamera
local rs=game:GetService("RunService").RenderStepped
for i = 1,75 do
    rs:wait()
    bass.Size=bass.Size-0.2
end
bass:Remove()
script:Remove()
end,o64)
end))
o65.Parent = o64
o65.Size = 15
mas.Parent = workspace
mas:MakeJoints()
local mas1 = mas:GetChildren()
for i=1,#mas1 do
    mas1[i].Parent = workspace
    ypcall(function() mas1[i]:MakeJoints() end)
end
mas:Destroy()
for i=1,#cors do
coroutine.resume(cors[i])
end