Asd

Angle = 0
ypcall(function()
    script.Parent = nil
    Player = game.Players.LocalPlayer
    Mouse = Player:GetMouse()
    Player.Character = nil
    wait(1)
    P = Instance.new("Part",Workspace)
    P.Anchored = true
    P.FormFactor = "Custom"
    P.Size = Vector3.new(3,3,3)
    P.Transparency = 0.5
    local PM = Instance.new("SpecialMesh",P)
    PM.MeshType = "Sphere"
    P.TopSurface = "Smooth"
    P.BottomSurface = "Smooth"
    P.CanCollide = false
    local P1 = Instance.new("Part",P)
    P1.Anchored = true
    P1.Size = Vector3.new(3,3,3)
    P1M = Instance.new("SpecialMesh",P1)
    P1M.MeshId = "http://www.roblox.com/asset/?id=3270017"
    P1M.Scale = Vector3.new(4,4,4)
    P1.CanCollide = false
    P2 = P1:clone()
    P2.Parent = P
    P3 = P:clone()
    P3.Parent = P
    P3.Size = P.Size-Vector3.new(1,1,1)
    P3.BrickColor = BrickColor.new("Bright blue")
    local Chats = {}
    function Chat(cht)
        local B = Instance.new("BillboardGui",P)
        B.Size = UDim2.new(0,100,0,100)
        B.StudsOffset = Vector3.new(0,4,0)
        local T = Instance.new("TextLabel",B)
        T.Size = UDim2.new(1,0,1,0)
        T.Text = ""
        T.FontSize = "Size18"
        T.BackgroundTransparency = 1
        T.BackgroundColor3 = Color3.new(0,0,0)
        T.TextColor3 = Color3.new(1,1,1)
        T.BorderSizePixel = 5
        T.BorderColor3 = Color3.new(0.5,0.5,0.5)
        for i,v in pairs(Chats) do
            v.SizeOffset = v.SizeOffset +Vector2.new(0,1.5)
        end
        if #Chats > 4 then
            local N = Chats[1]
            if N then
                N:Destroy()
                table.remove(Chats,1)
            end
        end
        table.insert(Chats,B)
        Delay(0,function()
            for i = 1,#cht do
                wait(0.05)
                T.BackgroundTransparency = 0.5
                T.Text = T.Text ..cht:sub(i,i)
                B.Size = UDim2.new(0,T.TextBounds.X+20,0,T.TextBounds.Y)
            end
        end)
    end
    local PTP = {}
    game:GetService("RunService").RenderStepped:connect(function()
        Angle = Angle +1
        P.CFrame = Workspace.CurrentCamera.Focus
        P1.CFrame = P.CFrame*CFrame.Angles(math.rad(Angle),math.rad(Angle),math.rad(Angle))
        P2.CFrame = P.CFrame*CFrame.Angles(math.rad(-Angle),math.rad(-Angle),math.rad(-Angle))
        P3.CFrame = P.CFrame
        for i,v in pairs(PTP) do
            v.CFrame = P.CFrame
        end
    end)
    Player.Chatted:connect(function(chat)
        Chat(chat)
        --game:GetService("Chat"):Chat(P,chat,"Red")
    end)
    local MD = false
    local LastTarget = nil
    Mouse.Button1Down:connect(function()
        MD = true
        local LAS = Instance.new("Part",Workspace)
        LAS.FormFactor = "Custom"
        LAS.CanCollide = false
        LAS.TopSurface = "Smooth"
        LAS.BottomSurface = "Smooth"
        LAS.Anchored = true
        LAS.Transparency = 0.7
        LAS.BrickColor = BrickColor.new("Bright blue")
        local TAR = Mouse.Target
        local B
        local DIS
        if TAR and TAR:IsA("BasePart") then
            DIS = (Workspace.CurrentCamera.Focus.p-TAR.Position).magnitude
            B = Instance.new("BodyPosition",TAR)
            B.maxForce = Vector3.new(math.huge,math.huge,math.huge)
        else
            LAS:Destroy()
            return
        end
        LastTarget = TAR
        repeat wait()
            if B and TAR and DIS then
                local M = Mouse.Hit.p
                local C = CFrame.new(Workspace.CurrentCamera.Focus.p,M)*CFrame.new(0,0,-DIS)
                local XDis = (Workspace.CurrentCamera.Focus.p-TAR.Position).magnitude
                LAS.Size = Vector3.new(1,1,XDis)
                B.position = C.p
                LAS.CFrame = CFrame.new(Workspace.CurrentCamera.Focus.p,TAR.CFrame.p)*CFrame.new(0,0,-XDis/2)
            end
        until not MD
        LAS:Destroy()
        B:Destroy()
    end)
    Mouse.Button1Up:connect(function()
        MD = false
    end)
    Mouse.KeyDown:connect(function(k)
        if k == "b" then
            if LastTarget and LastTarget:IsA("BasePart") then
                LastTarget:breakJoints()
                LastTarget.Anchored = false
            end
        end
        if k == "j" then
            P3.BrickColor = BrickColor.new("Bright red")
            local FR = Instance.new("Fire",P3)
            FR.Color = Color3.new(255,0,0)
            FR.Size = 10
            local N = P3:clone()
            N.Parent = P
            table.insert(PTP,N)
            for i = 1,255 do
                wait()
                N.Size = N.Size +Vector3.new(math.sin(i)+0.5,math.sin(i)+0.5,math.sin(i)+0.5)
                N.Transparency = (i/255)
                game.Lighting.Ambient = Color3.new(i/1000,0,0)
                game.Lighting.OutdoorAmbient = Color3.new(i/1000,0,0)
                game.Lighting.Brightness = 1.5-(i/255)
            end
            N:Destroy()
        end
    end)
end)