What is the issue with this card swapping algorithm?

This algorithm refers to two frames: Players and ReferenceFrame. After cards are saved to storage, this script refers to an invisible frame to swap players in order of rating (highest to lowest). This script is only working for most of the cards. If I saved 24 cards, an average of 15 cards will be stored and sorted while the other 9 are deleted.

for i = 1, 12, 1 do
		for k = 1, 12, 1 do
			local a = tonumber(script.Parent.Parent.ClubMenu.Players["Card"..k].PlayerRating.Text)
			print(a)
			local b = tonumber(script.Parent.Parent.ClubMenu.ReferenceFrame["Card"..i].PlayerRating.Text)
			print(b)
			if a > b then
				local isUsed = false
				for z = 1, #array, 1 do
					if array[z] == k then
						isUsed = true
					end
				end
				if isUsed == false then
					table.insert(array,#array,k)
					script.Parent.Parent.ClubMenu.ReferenceFrame["Card"..i].PlayerName.Text = script.Parent.Parent.ClubMenu.Players["Card"..k].PlayerName.Text
				end
			end
		end
	end
	wait()
	for j = 1, 120, 1 do
		script.Parent.Parent.ClubMenu.Players["Card"..j].PlayerName.Text = script.Parent.Parent.ClubMenu.ReferenceFrame["Card"..j].PlayerName.Text
	end
	wait(1)
	script.Parent.Parent.ClubMenu.Visible = true
end)