How come my 'Hologram' command/code isn't working properly?

I got this code working hardly in any time at all, it was a simple mistake; the .Chatted connection. :P

I would also recommand using my GetPlr function, I made mine so even if your msg is a nil it will refer to you.

local Prefix = "!"
local Container = {}

local GetPlr=function(Plr,Msg) local ReturnedTable={} -- Use mine if you would like.
if Msg:lower()=='me' or Msg=='' then table.insert(ReturnedTable,Plr)
elseif Msg:lower()=='all' then coroutine.wrap(function() for _,v in pairs(game.Players:GetPlayers()) do table.insert(ReturnedTable,v) end end)()
elseif Msg:lower()=='others' then for _,v in pairs(game.Players:GetPlayers()) do if v.Name~=Plr.Name then table.insert(ReturnedTable,v) end end
elseif Msg:lower()=='friends' then for _,v in pairs(game.Players:GetPlayers()) do if v:IsFriendsWith(Plr.userId) then table.insert(ReturnedTable,v) end end
elseif Msg:lower()=='bestfriends' then for _,v in pairs(game.Players:GetPlayers()) do if v:IsBestFriendsWith(Plr.userId) then table.insert(ReturnedTable,v) end end
elseif Msg:lower()=='nonfriends' then for _,v in pairs(game.Players:GetPlayers()) do if not v:IsFriendsWith(Plr.userId) then table.insert(ReturnedTable,v) end end
elseif Msg:lower()=='nonbestfriends' then for _,v in pairs(game.Players:GetPlayers()) do if not v:IsBestFriendsWith(Plr.userId) then table.insert(ReturnedTable,v) end end
elseif Msg:lower()=='nbc' then for _,v in pairs(game.Players:GetPlayers()) do if v.MembershipType == Enum.MembershipType.None then table.insert(ReturnedTable,v) end end
elseif Msg:lower()=='tbc' then for _,v in pairs(game.Players:GetPlayers()) do if v.MembershipType == Enum.MembershipType.TurboBuildersClub then table.insert(ReturnedTable,v) end end
elseif Msg:lower()=='obc' then for _,v in pairs(game.Players:GetPlayers()) do if v.MembershipType == Enum.MembershipType.OutrageousBuildersClub then table.insert(ReturnedTable,v)end end
elseif Msg:lower()=='anybc' then for _,v in pairs(game.Players:GetPlayers()) do if v.MembershipType==Enum.MembershipType.BuildersClub then elseif v.MembershipType==Enum.MembershipType.TurboBuildersClub then elseif v.MembershipType==Enum.MembershipType.OutrageousBuildersClub then table.insert(ReturnedTable,v) end end 
else for _,v in pairs(game.Players:GetPlayers()) do local NM=v.Name:lower() local Msg=Msg:lower() if NM:sub(1,5):lower():find(Msg) then table.insert(ReturnedTable,v) end end end wait() return ReturnedTable
end

CheckChat = function(plr,msg)
if msg:lower():sub(1 ,9+#Prefix ) == Prefix.."hologram " then --  !hologram<spacehere>
    local plrz = GetPlr(plr,msg:sub(10+#Prefix)); print("Hologram 1:",#plrz)
    for i,v in pairs(plrz) do print("Hologram 2")
        coroutine.resume(coroutine.create(function() print("Hologram 3")
    local rc,ec = ypcall(function()
            if v.Character then
                v.Character.Archivable = true
                local char = v.Character:Clone()
                char.Parent = workspace
                char:MakeJoints()
                char.Name = v.Name.."HOLOGRAM"
                char:MoveTo(v.Character:GetModelCFrame().p+Vector3.new(0,1,0))
                table.insert(Container,char)
                wait(.5)
                for i2,v2 in pairs(workspace[char.Name]:GetChildren()) do
                   if v2.ClassName == 'Part' and v2:IsA('BasePart') then
                        v2.BrickColor = BrickColor.new('Teal')
                        v2.Transparency = tonumber( .1 )
                   end
                    if v2.ClassName == 'Hat' and v2:FindFirstChild('Handle',true) then
                        if v2.Handle:FindFirstChild('Mesh',true) then
                            v2.Handle.Mesh.TextureId = ""
                        end
                    end
                    if v2.ClassName == 'Shirt' then
                        v2:remove()
                    end
                    if v2.ClassName == 'Pants' then
                        v2:remove()
                    end
                    if v2.ClassName == 'ShirtGraphic' then
                        v2:remove()
                    end
                    if v2:FindFirstChild('Head',true) and v2.Head:FindFirstChild('face',true) then
                        v2.Head.face.Texture = ''
                        v2.Head.face.Transparency = 1
                    end
                end
            v.Character.Archivable = false
            end
    end)
    if not rc then warn( tostring(ec) ) end
       end))
    end
end
end

game.Players.PlayerAdded:connect(function(plr)
    plr.Chatted:connect(function(msg)
        CheckChat(plr,msg)
    end)
end)