vip = {YOUR USGN};

function ifVip(id)
	for _, usgn in ipairs(vip) 
		do
		if(player(id, 'usgn') == usgn)
			then
			return true;
		end
	end
	return false;
end

addhook("say", "_say")
function _say(id, txt)
	if ifVip(id) then
		if string.sub(txt, 1, 5) == "!hats" then
			menu(id, "Hats, Hat 1, Hat 2, Hat 3, etc")
		end
	end
end

addhook("menu", "_menu")
function _menu(id, title, button)
	if title == "Hats" then
		if button == 1 then
			pl_hat = image("HAT PATH 1", 0, 0, id+200);
		else
			if button == 2 then
				freeimage(pl_hat);
				pl_hat = image("HAT PATH 2", 0, 0, id+200);
			else
				if button == 3 then
					freeimage(pl_hat);
					pl_hat = image("HAT PATH 3", 0, 0, id+200);
				end
			end
		end
	end
end

addhook ("serveraction","Hatsmenu")
function Hatsmenu(id, action)
     if action == 1 -- Which 1 refers to F2 button, you can change also to 2 or 3, your choice
          menu(id,"Hats menu, First hat, Second hat, Third hat, Remove the recent hat!") -- This is the menu list with hats in it, you can add more in your choice
     end
end

addhook ("menu","Hats")
function Hats(id, title, button)
	if title == "Hats menu" then
		if button == 1 -- As I've said below in the reply, First Hat is the first button
			freeimage(id)
			image("The hat's file path",1,1,200+id)
			elseif button == 2 then
				-- and so forth...
			end
		end
	end
end