How to make a text button for each hat in a player?

I don't know why, but this script only makes it for one hat, not all.

function hatsframe() local hats = char:GetChildren()

for i, v in pairs(hats) do
    if v:isA("Accessory") then
        local a = Instance.new("TextButton")
        a.Text = v.Name
        a.Parent = script.Parent
    end

end

end

can someone please help me??