Why doesn't my gampass script work?

gpid = 339516128  
hats = {"Cap"}

GPS = game:GetService("GamePassService") 
function respawned(char) 
local plr = game.Workspace:WaitForChild(char.Name)
local HatTag = Instance.new("IntValue")
HatTag.Name = "HatTag"
HatTag.Parent = char
if plr:FindFirstChild("Head") ~= nil then 
if game:GetService("MarketplaceService"):PlayerOwnsAsset(char,gpid) then
for i = 1,#hats do
game.ServerStorage:FindFirstChild(hats[i]):Clone().Parent = plr
end
char.Changed:connect(function(property) Respawn(property, char) end) --Checks to see if this player has died by using ".Changed"
else 
end 
end 
end 
game.Players.PlayerAdded:connect(respawned)

function Respawn(property, player)
	for i = 1,#hats do
game.ServerStorage:FindFirstChild(hats[i]):Clone().Parent = player.Character --Puts the hat back on the character.
	end
end

I would also recommend putting the 'Cap' in ReplicatedStorage, as it is the replacement for Lighting, Server Storage is used for other things.