Beacon

local Player = owner
local Character = owner.Character
local Beacon = Instance.new("Model",Character)
Beacon.Name = "Beacon"
Beacon.Parent = Character
local Core = Instance.new("Part",Beacon)
Core.Size = Vector3.new(1.5,1.5,1.5)
Core.CFrame = CFrame.new(2.025,-0.725+2,1.68)
Core.Anchored = true
Core.Locked = true
Core.TopSurface = Enum.SurfaceType.Smooth
Core.BottomSurface = Enum.SurfaceType.Smooth
local FaceValue1 = 0
for i = 1,6 do
    FaceValue1 = FaceValue1+1
    local Decal = Instance.new("Decal",Core)
    Decal.Texture = "rbxassetid://152410077"
    if FaceValue1 == 1 then
        Decal.Face = Enum.NormalId.Front
    elseif FaceValue1 == 2 then
        Decal.Face = Enum.NormalId.Back
    elseif FaceValue1 == 3 then
        Decal.Face = Enum.NormalId.Left
    elseif FaceValue1 == 4 then
        Decal.Face = Enum.NormalId.Right
    elseif FaceValue1 == 5 then
        Decal.Face = Enum.NormalId.Top
    elseif FaceValue1 == 6 then
        Decal.Face = Enum.NormalId.Bottom
    end
end
local Glass = Instance.new("Part",Beacon)
Glass.Size = Vector3.new(2.125,2.125,2.25)
Glass.CFrame = CFrame.new(2.018,-0.788+2,1.68)
Glass.Anchored = true
Glass.Locked = true
Glass.Transparency = 1
Glass.TopSurface = Enum.SurfaceType.Smooth
Glass.BottomSurface = Enum.SurfaceType.Smooth
local FaceValue2 = 0
for i = 1,6 do
    FaceValue2 = FaceValue2+1
    local Decal = Instance.new("Decal",Glass)
    Decal.Texture = "rbxassetid://1086749406"
    if FaceValue2 == 1 then
        Decal.Face = Enum.NormalId.Front
    elseif FaceValue2 == 2 then
        Decal.Face = Enum.NormalId.Back
    elseif FaceValue2 == 3 then
        Decal.Face = Enum.NormalId.Left
    elseif FaceValue2 == 4 then
        Decal.Face = Enum.NormalId.Right
    elseif FaceValue2 == 5 then
        Decal.Face = Enum.NormalId.Top
    elseif FaceValue2 == 6 then
        Decal.Face = Enum.NormalId.Bottom
    end
end
local Obsidian = Instance.new("Part",Beacon)
Obsidian.Size = Vector3.new(1.875,0.375,2)
Obsidian.CFrame = CFrame.new(2.018,-1.663+2,1.68)
Obsidian.BrickColor = BrickColor.new("Really black")
Obsidian.Material = Enum.Material.SmoothPlastic
Obsidian.Anchored = true
Obsidian.Locked = true
Obsidian.TopSurface = Enum.SurfaceType.Smooth
Obsidian.BottomSurface = Enum.SurfaceType.Smooth
local Beam = Instance.new("Part",Beacon)
Beam.Size = Vector3.new(.8,500,.8)
Beam.CFrame = CFrame.new(2.018,250,1.68)
Beam.Anchored = true
Beam.CanCollide = false
Beam.Locked = true
Beam.TopSurface = Enum.SurfaceType.Smooth
Beam.BottomSurface = Enum.SurfaceType.Smooth
local FaceValue3 = 0
for i = 1,6 do
    FaceValue3 = FaceValue3+1
    local Texture = Instance.new("Texture",Beam)
    Texture.Texture = "rbxassetid://152410036"
    Texture.StudsPerTileU = .8
    Texture.StudsPerTileV = .8
    if FaceValue3 == 1 then
        Texture.Face = Enum.NormalId.Front
    elseif FaceValue3 == 2 then
        Texture.Face = Enum.NormalId.Back
    elseif FaceValue3 == 3 then
        Texture.Face = Enum.NormalId.Left
    elseif FaceValue3 == 4 then
        Texture.Face = Enum.NormalId.Right
    elseif FaceValue3 == 5 then
        Texture.Face = Enum.NormalId.Top
    elseif FaceValue3 == 6 then
        Texture.Face = Enum.NormalId.Bottom
    end
end
local SecondBeam = Instance.new("Part",Beacon)
SecondBeam.Size = Vector3.new(1,500,1)
SecondBeam.CanCollide = false
SecondBeam.Locked = true
SecondBeam.Transparency = .95
SecondBeam.Material = Enum.Material.Neon
SecondBeam.BrickColor = BrickColor.new("Lily white")
SecondBeam.TopSurface = Enum.SurfaceType.Smooth
SecondBeam.BottomSurface = Enum.SurfaceType.Smooth
local SecondBeamWeld = Instance.new("Weld",SecondBeam)
SecondBeamWeld.Part1 = SecondBeam
SecondBeamWeld.Part0 = Beam
local PointLight = Instance.new("PointLight",Glass)
local Sound = Instance.new("Sound",Glass)
Sound.Volume = 3
Sound.Looped = true
Sound.SoundId = "rbxassetid://2830283353"
Sound:Play()
spawn(function()
    while wait(.1) do
        for i,v in pairs(workspace:GetChildren()) do
            if v:FindFirstChildWhichIsA("Humanoid") then
                local Torso = v:FindFirstChild("HumanoidRootPart") or v:FindFirstChild("Torso") or v:FindFirstChild("UpperTorso")
                if not Torso:FindFirstChild("Particles") then
                    local Particles = Instance.new("ParticleEmitter",Torso)
                    Particles.Name = "Particles"
                    Particles.Texture = "rbxassetid://3450652426"
                    Particles.SpreadAngle = Vector2.new(5000000,5e+06)
                    Particles.RotSpeed = NumberRange.new(360,360)
                    Particles.Size = NumberSequence.new(.25)
                    Particles.Drag = 3
                    Particles.Rate = 5
                    Particles.Lifetime = NumberRange.new(2,2)
                end
            end
        end
    end
end)
spawn(function()
    game:GetService("RunService").Stepped:Connect(function()
        Beam.Orientation = Vector3.new(Beam.Orientation.X,Beam.Orientation.Y+1,Beam.Orientation.Z)
    end)
end)