Glitch Text only

local function CHAT(msg,filt)
    --setups
    local PL=game:service("Players").LocalPlayer
    local RootPart=PL.Character.HumanoidRootPart
    local function sw(num)
    if num~=nil then
    for i=1,num do
    game:service("RunService").RenderStepped:wait()end
    else game:service("RunService").RenderStepped:wait()
    end
    end
    --
    if RootPart:FindFirstChild("_CHAT")then RootPart._CHAT:Destroy()end local num=10 local ris=5.5
    local b=Instance.new("BillboardGui",RootPart)b.Name="_CHAT"b.Size=UDim2.new(1,0,1,0)b.StudsOffset=Vector3.new(0,ris,0)
    local txt=Instance.new("TextLabel",b)txt.Text=""txt.Size=UDim2.new(256,0,3,0)txt.BackgroundTransparency=1
    txt.TextColor3=Color3.new(.75)txt.TextStrokeTransparency=0 txt.Position=UDim2.new(-127.5,0,0,0)txt.Font="Fantasy"
    if filt then msg=game:service("Chat"):FilterStringAsync(msg,PL,PL)end txt.TextSize=32 txt.TextScaled=true b.AlwaysOnTop=1
    spawn(function()
        spawn(function()
            while b.Parent do
                b.StudsOffset=Vector3.new(math.random(-num,num)/100,ris+math.random(-num,num)/100,math.random(-num,num)/100)
                local m=""
                for i=0,string.len(txt.Text)do local nul=nil local rand=math.random(10)
                    --[[if txt.Text:sub(i,i)=="o"or txt.Text:sub(i,i)=="O"or txt.Text:sub(i,i)=="0"then
                        if rand==1 then nul="o"end if rand==2 then nul="O"end if rand==3 then nul="0"end
                    end
                    if txt.Text:sub(i,i)=="1"or txt.Text:sub(i,i)=="I"or txt.Text:sub(i,i)=="i"then
                        if rand==1 then nul="1"end if rand==2 then nul="I"end if rand==3 then nul="i"end
                    end]]
                    if rand==1 then
                        nul=string.lower(txt.Text:sub(i,i))
                    end
                    if rand==2 then
                        nul=string.upper(txt.Text:sub(i,i))
                    end
                    if txt.Text:sub(i,i)=="#"then
                        nul=math.random(1,10)-1
                    end
                    if nul==nil then nul=txt.Text:sub(i,i)end
                    m=m..nul
                end
                txt.Text=m
                sw()
            end
            end)
        for i=0,string.len(msg)do
            if b.Parent then
            txt.Text=msg:sub(0,i)
            sw(3)
            end
        end
        for i=0,120 do if b.Parent then txt.Text=msg sw()end end
        for i=0,1,.025 do if b.Parent then
            txt.Text=msg txt.TextTransparency=i txt.TextStrokeTransparency=i ris=ris+.05 sw()end
        end b:Destroy()
    end)
end
if 1 then local PL=game:service("Players").LocalPlayer
PL.Chatted:connect(function(m)CHAT(m,true)end)end