bla.......

hat = {}
for i = 1, 32 do
     hat[i] = 0
end

addhook("say","sayhat")
function sayhat(id,text)
	if text = !hats  ------- I did this part right. Dont ask about it. Just think if we say !hats then :
			freeimage(hat[id])
	hat[id]=image("gfx/sprites/hat.bmp",0,0,100+i)
end
end

imagecolor(imageid,r,g,b)
imagescale(imageid,sizex,sizey)
imageblend(imageid,blend)