image("path",x,y,2,id)

addhook([[always]], [[updateImages]])
function updateImages()
	for _, pl in pairs(player(0, [[table]])) do
		while player(pl, [[exists]]) do
			local function checkNumbers(pl, num)
				images([[gfx/numbers/]]..num..[[.png]], 0, 0, 2, pl)
			end
			if player(pl, [[health]]) > 0 then
				local img = checkNumbers(pl, player(pl, [[health]]))
				imagepos(img, 320, 240, 0)
			end
		end
	end
end

addhook("hit", "_hit")
addhook("die", "_die")
addhook("spawn", "_spawn")
addhook("leave", "_leave")

local images = {}

function removeImages(id)
    images[id] = images[id] or {}
    for i = 1, #images[id] do
        freeimage(images[id][i])
    end
    images[id] = {}
end

function _hit(id, source, wpn, hpdmg)
    removeImages(id)
    local newHP = tostring(player(id, "health") - hpdmg)
    for i = 1, #newHP do
        local img = image("gfx/numbers/"..newHP:sub(i,i)..".png", 0, 0, 2, id)
        imagepos(img, 320 + (i-1) * 50, 240, 0)
        table.insert(images[id], img)
    end
end

function _spawn(id)
    _hit(id, 0, 0, 0)
end

function _die(id)
    removeImages(id)
end

function _leave(id)
    removeImages(id)
end