666 script

local OUTLINE_NAME = "SkurbRedOutline"
local FIRE_NAME = "SkurbFire"

local function applyToPart(part)
    if not part or not part:IsA("BasePart") then return end
    if not part:FindFirstChild(OUTLINE_NAME) then
        local sb = Instance.new("SelectionBox")
        sb.Name = OUTLINE_NAME
        sb.Adornee = part
        sb.Color3 = Color3.new(1,0,0)
        sb.LineThickness = 0.03
        sb.Parent = part
    end
    if not part:FindFirstChild(FIRE_NAME) then
        local fire = Instance.new("Fire")
        fire.Name = FIRE_NAME
        fire.Size = 25
        fire.Heat = 0
        fire.Parent = part
    end
end

for _,v in ipairs(workspace:GetDescendants()) do
    if v:IsA("BasePart") then
        applyToPart(v)
    end
end

workspace.DescendantAdded:Connect(function(desc)
    if desc:IsA("BasePart") then
        applyToPart(desc)
    end
end)